Difference between revisions of "user should not be able to close form/de"
From Lazarus wiki
Jump to navigationJump to searchm |
m |
||
Line 23: | Line 23: | ||
<br> | <br> | ||
--[[User:Olaf|Olaf]] 05:16, 27 May 2013 (UTC) | --[[User:Olaf|Olaf]] 05:16, 27 May 2013 (UTC) | ||
− | [[Category:Code Parts/de]][[Category: | + | [[Category:Code Parts/de]][[Category:GUI/de]] |
Revision as of 11:56, 29 May 2013
│
Deutsch (de) │
English (en) │
français (fr) │
Die Prozedur verhindert das Beenden des eigenen Programms durch den Anwender.
Dafür muss das Ereignis OnCloseQuery angepasst werden.
Beispiel:
uses
Forms, ...;
...
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose:=false;
end;
...
--Olaf 05:16, 27 May 2013 (UTC)