Als einen Befehl kann es das ja nicht geben, denn du brauchst zumindestens 2 ... einen um das Programm auszublenden und noch einen zum erstellen des TrayIcons
Ein Beispiel wäre hier.
Mein Delphi-PRAXiS ShoutBox Reader
Delphi-Quellcode:
procedure TMainForm.SendToTNA;
begin
...
Hide;
FIconData.szInfo := '
Der ShoutBox Reader wurde in die TNA minimiert und ' +
'
wartet auf weitere Anweisungen.';
FIconData.szInfoTitle := '
Delphi-PRAXiS :: ShoutBox Reader';
Shell_NotifyIcon(NIM_ADD, @FIconData);
end;
[add]
upss Tubos ... hab mich einfach von den anderen mitreisen lassen ._.