Kein doppelter Programstart aber Fenster in den Vordergrund

[Hansa]

Aha, (teilweise) mein Quelltext schon hier. Der Vollständigkeit halber nur noch folgendes: diese Unit muß in der DPR unter uses aufgeführt werden und das wars ! Im Hauptprogramm muß dann nur das geändert werden:

Delphi-Quellcode:

begin
  Application.Initialize;
  if not BereitsAktiv then begin
    Application.CreateForm(TForm1, Form1);
...
    Application.Run;
  end
  else
    Application.Terminate;
end.