Hallo zusammen,
Ich habe zwei Forms, bei denen Form2 immer über einem Teil von Form1 liegen muss, auch wenn ich auf nicht überdeckte Bereiche von Form1 zugreife (das muss ich können, deshalb geht Form2.ShowModal schon mal nicht).
Daher habe ich bei Form2.Formstyle auf fsstayontop gesetzt. Das würde mir im Prinzip reichen, allerdings kommt es dann vor, dass sich ein anderes aktives Fenster (welches den Fokus bekommt) zwischen Form1 und Form2 schiebt. Form1 auch auf stayontop setzen, will ich nicht.
daher war meine Idee:
Delphi-Quellcode:
procedure TForm1.ApplicationEvents1Deactivate(Sender: TObject);
begin
form2.FormStyle := fsnormal;
end;
procedure TForm1.ApplicationEvents1Activate(Sender: TObject);
begin
form2.FormStyle := fsstayontop;
end;
Leider hat das nicht den gewünschten Erfolg: ein nicht programmeigenes Fenster, welches aktiv wird, ist dann zwischen form1 und form2. Irgendwas mache ich falsch bei diesen ApplicationEvents. Kann mir jemand einen Tipp geben?