Warum funktioniert das nicht?

void __fastcall TForm1::FormCreate(TObject *Sender)
{
Application->MessageBoxA("Programm wird beendet","Beenden",MB_OK);
Close();
}

Ich gehe davon aus das Close(); nicht in FormCreate stehen darf...
aber wo dann?

(das Programm soll bewusst direkt nach dem öffnen sich wieder schließen...

weil die Anwendung zu dem Zeitpunkt nocht nich vollständig initialisiert ist! Mit Close(); tust du nur das MeinForm schließen, was ja zu dem Zeitpunkt noch nicht gestartet ist. DU kannst es aber mit Terminate() abfangen:

Application->MessageBox("Programm wird beendet", "Ende", 0);
Application->Terminate();

mfg, Micha