Programm ohne Taskbareintrag, nur TrayIcon?

[spaxxn]

Delphi-Quellcode:

procedure TfrmMain.ApplicationMinimize(Sender : TObject);
begin
  ShowWindow(Handle, SW_HIDE);
  tiMain.Show;
end;

procedure TfrmMain.FormActivate(Sender : TObject);
begin
  ApplicationMinimize(Self);
end;

tiMain ist bei mir das TrayIcon. ShowMainForm := False bleibt...