Difference between revisions of "user should not be able to close form/de"
From Lazarus wiki
Jump to navigationJump to searchLine 24: | Line 24: | ||
<br> | <br> | ||
--[[User:Olaf|Olaf]] 05:16, 27 May 2013 (UTC) | --[[User:Olaf|Olaf]] 05:16, 27 May 2013 (UTC) | ||
+ | |||
+ | |||
+ | {{AutoCategory}} | ||
[[Category:Code/de]] | [[Category:Code/de]] | ||
[[Category:LCL/de]] | [[Category:LCL/de]] | ||
[[Category:Forms/de]] | [[Category:Forms/de]] | ||
− | [[Category:Code | + | [[Category:Code Snippets/de]] |
− | [[Category:GUI/de]] | + | [[Category:GUI/de]] |
Revision as of 01:00, 30 October 2015
│
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)