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.