Unabhänige formen(Minimirungs probleme mit CoolTrayIcon)

[turboPASCAL]

Versuch es mal so, erstelle eine Hauptformular (Form1) und dann zwei Nebenformulare (Form2 und Form3)
in die Nebenformulare packst Du deine TrayIcons.
Das Hauptformular versteckst Du einfach mit (Form1).Hide. Dann kannst Du die beiden anderen Formulare
unabhängig von einander in die TNA minimieren.

Nachteil, das beenden der Application muss man selbst übernehmen. (wenn man Form2 und Form3 schliest ist immer noch Form1 aktiv und versteckt.)

Warum ? Die Nebenformulare sind vom Hauptformular abhängig d.h. wenn man das Hauptformular (Form1) minimiert werden auch alle anderen Formen diesem untergeordnet und versteckt. Also gleichzusetzen mit Application.Minimitze.

Ich hoffe mal das ich hier kein Schmarn geredet habe.

// Nachtrag:

Für Form2, Form3 usw. volgenes einfügen:

Delphi-Quellcode:

uses
  Windows, Messages,...;

type
  TForm2 = class(TForm)
    procedure CreateParams(var Params: TCreateParams); override; // <----<<<
    ...
    ...

var
  Form2: TForm2;

implementation

procedure TForm2.CreateParams(var Params: TCreateParams); // <----<<<
begin
  inherited;
  Params.ExStyle:=Params.ExStyle or WS_EX_APPWINDOW;
  Params.WndParent := GetDesktopWindow;
end;

Damit weist Du die Form2 usw. an sich wie die Hauptform beim minimieren zu verehalten.