Besser gesagt, es wird keine Komponente angezeigt, da ich das entsprechende Formular zur Laufzeit erzeugt habe.
Hier der gesamte Quelltext:
TForm *Form1 = new TForm(Application);
TMainMenu *MainMenu1 = new TMainMenu(Form1);
TMenuItem *MI1 = new TMenuItem(MainMenu1);
TButton *B1 = new TButton(Form1);
Form1->ShowModal();
Form1->Menu = MainMenu1;
MainMenu1->Items->Insert(0, MI1);
MI1->Caption = "Datei";
MI1->Visible = True;
B1->Show();
B1->Left = 20;
B1->Width = 20;
B1->Height = 20;
B1->Top = 20;
B1->Visible = True;