user should not be able to close form/de
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;
...From the Free Pascal wiki, page "user should not be able to close form/de", as it stood on 2020-03-03 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.
Edited on wiki.freepascal.org by 5 people, 2013–2020
From the official wiki's backup of 26 May 2024: who edited this page there, and when. Edits made there after that date were not recorded, and the earlier versions are not shown here; the main page says why.
| When | Who | What changed |
|---|---|---|
| Olaf | Created page | |
| Olaf | moved user is not able to form close/de to user is not able to close form/de (minor) | |
| Olaf | (minor) | |
| Olaf | moved user is not able to close form/de to user should not be able to close form/de (minor) | |
| Olaf | (minor) | |
| Olaf | ||
| Olaf | (minor) | |
| Olaf | (minor) | |
| Olaf | (minor) | |
| Olaf | (minor) | |
| Michl | ||
| Michl | ||
| FTurtle | ||
| E-ric | (minor) | |
| Trev | Fixed syntax highlighting; deleted category included in page template (minor) |
Talk about this page
Nobody has opened a bench for this page yet. Sign in to open one.