Programm im Tray (tna) starten mit Cooltray

[Dreas]

Hallo Leute,

ich kriegs einfach nicht hin. Hab auch nichts hilfreiches gefunden...
Ich möchte, das mein Programm gleich vom Start an nur als Tray-Icon sichtbar ist.
Ich benutze die Cooltray Components & D7.

Wenn ich sage:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
 CoolTrayIcon1.IconVisible := True;
 CoolTrayIcon1.HideMainForm;
end;

passiert gar nichts.
Gut, das Icon ist sichtbar aber das Formular und der Task eben auch noch!
Und die beiden Sachen sollen ja sofort verschwinden.

Allerdings löst

Delphi-Quellcode:

CoolTrayIcon1.HideMainForm;

im OnClick-Ereignis vom button1 genau das aus, was ich haben möchte. Nämlich Formular weg, raus aus der Taskleiste und ab in den Systray.

Versteh ich nicht, warum das beim button geht und woanders nicht?!?! :wall:

Wie mach ich das denn richtig?

[MrKnogge]

Hi,

benutz hierfür das Ereignis "OnStartup"

gruss

[Dreas]

Jupp, geht!
Allerdings nicht mit

Delphi-Quellcode:

CoolTrayIcon1.HideMainForm;

sondern mit

Delphi-Quellcode:

procedure TForm1.CoolTrayIcon1Startup(Sender: TObject;
  var ShowMainForm: Boolean);
begin
   ShowMainForm:=false;
end;

Aber genau so wollt ichs haben.
Vielen Dank Mr.Knogge!
Daher soll mein nächstes Pils Ihnen gewidmet sein... :mrgreen:

MfG Dreas

[MrKnogge]

Na denn :cheers: