Einzelnen Beitrag anzeigen

Benutzerbild von Trouble_Maker
Trouble_Maker

Registriert seit: 30. Jan 2003
244 Beiträge
 
Delphi 6 Personal
 
#3
  Alt 14. Jun 2003, 10:02
hab nochn Tip für dich ...

damit du nicht aus versehen dein Formular mit dem Kreuz rechts oben schließt oder mit ALT+F4 und somit wieder mit STRG+ALT+ENF "arbeiten" musst...

kannst du folgenden code einbauen

Code:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose:=FALSE;
end;
damit verhinderst du dass dein Programm mit den oben beschriebenen Möglichkeiten geschlossen wird. Also nur über dein Button mit "application terminate".


cu Trouble_Maker
  Mit Zitat antworten Zitat