Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Andere Fenster verdrängen (Form am oberen Bildschirmrand)


whitef - Mo 20.08.12 23:03
Titel: Andere Fenster verdrängen (Form am oberen Bildschirmrand)
hi,
ich wollte euch fragen, wie ich meine Form, welche bereits am oberen Bildschirmrand erscheint, alle anderen Fenster verdrängt (bzw. unter sich positioniert).

Der Vorgang des "Neupositionieren" soll dem beim starten der "Bildschirmlupe" (Win 7) gleichen. (Zu finden: Start > Alle Programme > Zubehör > Erleichterte Bedienung > Bildschirmlupe)


Mein bisheriger Code um die Form am oberen Bildschirmrand erscheinen zu lassen:

Delphi-Quelltext
1:
2:
3:
4:
5:
Form1.Tray.Active := True;
Form1.Hide;
Form2.Left := 0;
Form2.Top := 0;
Form2.Width := Form1.cpuinfo.Screen.Width;



mfg


Delete - Di 21.08.12 10:19

Wenn ich mich recht erinnere musst du mit SystemParametersInfo die Workarea entsprechend setzen. Ich bin mir aber nicht sicher, weil das schon ewig her ist. Mir fällt jetzt auch nicht die genau Bezeichnung ein, wie man solche Fenster nimmt. Ich meine da gibt es eine genaue Bezeichnung.

Hab's. Das Stichwort ist Appbar. Damit solltest du fündig werden.


whitef - Fr 24.08.12 20:02

Hab hier für mich meine Lösung gefunden, wobei da noch das eine oder andere zu beheben ist :lol:

http://www.delphipraxis.net/24419-arbeiten-mit-appbars-4.html#post1179134