Programm beim Beenden weiterlaufen lassen

[Anfänger_Newbie]

Hi,
ich habe mir ein Delphi-Programm erstellt, das eigentlich fertig ist. Mir fehlt bloß eine Funktion. Und zwar möchte ich, wenn man das Programm beendet (also das Hauptformular schließt), dass das Programm nicht beendet wird, sondern versteckt weiterläuft. Zusätzlich wäre es toll, wenn dann ein Symbol in der Systray erscheint.
Eigentlich müsste mein Prob ja lösbar sein, aber ich bin noch Anfänger und daher brauche ich eure Hilfe.
Vielen Dank

[S2B]

Zuerst mal Willkommen in der Delphi-PRAXiS!

Schreib einfach

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose:=false;
  //Der Code fürs Trayicon
end;

Und fürs Trayicon wirst du hier fündig: trayicon.

[Matze]

Herzlich Willkommen in der DP!

Stelle dazu im OnCloseQuerry einfach "CanClose" auf false und führe darin dann den Code aus.

tna

Aber Achtung, führe am besten eine boolsche variable ein, und nur, wenn diese true ist, ist "CanClose" = false, sonst lässt sich dein programm gar nicht mehr beenden.

[Anfänger_Newbie]

Vielen Dank für eure Hilfe.
Mit dem Nicht-Mehr-Beenden funzt alles, danke.
Allerdings komme ich mit dem Systraykram nicht so zurecht.
Bin noch wirklich blutiger Anfänger. Wäre toll, wenn mir jemand ne Schritt-für-Schritt-Anleitung geben könnte

[S2B]

Hier mal ein Link mit Trayicon-Kompos von Torry: klick.

[SirThornberry]

du könntest bei torry auch mal nach systray-komponenten suchen wenn du gar nicht damit zurecht kommst

[Edit]War wohl zu langsam[/Edit]