Difference between revisions of "user should not be able to close form/de"
From Lazarus wiki
Jump to navigationJump to searchm |
|||
Line 27: | Line 27: | ||
{{AutoCategory}} | {{AutoCategory}} | ||
− | |||
[[Category:LCL/de]] | [[Category:LCL/de]] | ||
− | |||
[[Category:Code Snippets/de]] | [[Category:Code Snippets/de]] | ||
[[Category:GUI/de]] | [[Category:GUI/de]] |
Revision as of 08:43, 28 November 2016
│
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)