user should not be able to close form/de

From Free Pascal wiki

Deutsch (de) English (en) français (fr)

Zurück zur Seite Code Beispiele.

Die Prozedur verhindert das Beenden des eigenen Programms durch den Anwender.
Dafür muss das Ereignis OnCloseQuery der Form angepasst werden.

Beispiel:

uses
  Forms, ...;
  
  ...
  
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin 
  CanClose:=false; 
end;
  
  ...



--Olaf 05:16, 27 May 2013 (UTC)