procedure TForm1.FormCreate(Sender: TObject);
が動いてないようなんですけど、エラーも出ないし、起こりえますか?
やりたいことは、システムメニューに項目を追加したいという単純なものなんですけど。。。。