Programm soll sich nicht beenden lassen

[xZise]

Hi Nils.

Zitat von 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.

Stimmt nicht immer. Es gab hier einen Fall, in dem man das Programm über das "Close" in das Tray packt. Dummerweise ließ sich dann aber nicht sein PC runterfahren, weil genau diese Anwendung lief.
Leider kann ich den Thread nicht ausfindig machen.
Und PS: Außer du fährst "hart" runter...