Programm soll sich nicht beenden lassen

[Nils_13]

Zitat von xZise:

Entweder:
1. Mach ein Button auf die form, welche das schließen freigibt:

Delphi-Quellcode:

procedure OnButtonClick...
begin
  StopBlock := true;
  close;
end;

procedure OnCloseQuery...
begin
  CanClose := StopBlock;
end;

2. Programmiere in Programm:
Deaktiviere den Button, wenn "Delphi" läuft.

Das ist Windows egal, ob CanClose True ist oder nicht, es wird abgeknallt und dann war's das.

Zitat von Harry M.:

Fange den Vorgang des Herunterfahres ab mit WMQueryEndSession.

Wie genau macht man das ? Ich hatte mit Messages noch nie zu tun.