TService: OnShutdown feuert nicht

[himitsu]

Zitat von bcvs:

Nein, hat ja kein Fenster.

Braucht er auch nicht, naja, nicht direkt,
aber nein, dein Dienst hat ein "Fenster", siehe Application.

TService nutzt intern die VCL, für die Messagebehandlung.
Forms.Application.Handle (HWND) ist das Basis-MessageWindow der VCL.



SvcMgr.Application (TServiceApplication) die hauptklasse des Delphi-Services,
aber intern wird auf Forms.Application (TApplication) zugrgriffen ... das kannst du auch, indem du die Unit Forms einbindest.

Bzw. du kannst auch TApplicationEvents verwenden. Ist eh besser als direkt auf die Events von Forms.Application zuzugreifen.


Message-Only Window: Das sind unsichtbare "Fenster" ohne Parent ... SystemMessages werden von Windows an alle TopLevel-Windows gesendet.

Du kannst auch selbst ein Message-Only Window erstellen. (PS: jeder VCL-TTimer hat intern auch sein eigenes Fenster)
https://docs.microsoft.com/en-us/win...e-only-windows