Einzelnen Beitrag anzeigen

Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
9.582 Beiträge
 
Delphi 11 Alexandria
 
#14

AW: Eigene Tray-Benachrichtigungen anzeigen statt TTrayIcon

  Alt 7. Jan 2024, 17:04
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;
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
  Mit Zitat antworten Zitat