Eigene Tray-Benachrichtigungen anzeigen statt TTrayIcon

[jaenicke]

Wie ich schrieb:
Wenn du einen Haltepunkt setzt, siehst du, dass DoClose das Event aufruft.
Screenshot11 2024-01-07 170021.png

Und das kannst du einfach überschreiben. Dann landest du im Formular dort und danach im Handler des TToast.
Screenshot 2024-01-07 170150.png

Delphi-Quellcode:

type
  TForm1 = class(TForm)
  private
    { Private-Deklarationen }
  protected
    procedure DoClose(var Action: TCloseAction); override;

...

procedure TForm1.DoClose(var Action: TCloseAction);
begin
  inherited;

end;