Zwei Fenster immer oben

[BlueStarHH]

Hi,

ich möchte zwei Fenster immer oben, vor allen anderen Fenstern, haben. Wenn ich bei Delphi 5 beide Fenster mit FormStyle = fsStayOnTop erzeuge, klappt es nur zuerst. Sobald unter Windows XP das zweite Fenster angeklickt wird und dann auf eine andere Applikation geklickt wird, verschwinden beide Fenster in den Hintergrund. Ist nur das erste Fenster offen, ist dies in allen Fällen oben. Wie klappt es auch mit zwei Fenstern?

Um das Problem nachzuvollziehen erzeugt ein neue Projekt und zwei TForms. Auf Form1 einen Schalter mit dem folgende Code einfügen und aus der DPR die Erzeugung von Form2 löschen (ums richtige Freigeben von Form2 geht es hier nicht):

In der DPR-Datei

Delphi-Quellcode:

  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;

In Form1
Im Objektinspektor: FormStyle := fsStayOnTop
Und zusätzlich:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Application.CreateForm(TForm2, Form2);
  Form2.Show;
end;

In Form2
Im Objektinspektor: FormStyle := fsStayOnTop

[RavenIV]

wie das Wort "stayOnTop" schon sagt:
es kann nur ein Fenster das oberste sein.

aber such mal hier im forum, dies wurde schon öfters diskutiert...

gruessle

[BlueStarHH]

Danke! Ich hatte zwar schon gesucht, aber mit dem falschen Suchbegriff. Die Lösung ist unter http://www.delphipraxis.net/internal...ight=stayontop zu finden.