CoolTray: Programm stoppt wenn minimiert

[JPSelter]

Alles was in meinem Quelltext mit CoolTray zutun hat, ist dieses hier:

Code:

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

procedure TForm1.CoolTrayIcon1DblClick(Sender: TObject);
begin
  CoolTrayIcon1.ShowMainForm;
end;

Achja, wofür steht CTI? Control Task Icon?