Hallo,
versuche es einmal hiermit:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
//Schliessen Button disable
EnableMenuItem(GetSystemMenu(Form1.Handle, LongBool(False)),
SC_CLOSE, MF_BYCOMMAND or MF_GRAYED);
end;
Gruß
Reinhard
[edit=Luckie]Delphi-Tag korrigiert. Mfg, Luckie[/edit]