Entwickler-Ecke

Windows API - Formular immer am rechten unteren Desktop öffnen!


Roy - Fr 29.12.06 18:11
Titel: Formular immer am rechten unteren Desktop öffnen!
Ich grüße euch Delphi-Freunde,
habe mal wider ein Problem. Was muss ich machen das mein Programm beim Start, egal auf welchem PC immer am rechten unteren Desktop öffnet!

Danke Roy


jakobwenzel - Fr 29.12.06 18:13

Es gibt nur einen Desktop!

Falls du meinst, dass das Formular an der Ecke rechts unten erscheinen soll:

Delphi-Quelltext
1:
2:
Left:=Screen.Width-Width;
Top:=Screen.Height-Height;


BTW: vllt. muss man da noch die Höhe der Taskleiste rausrechnen :nixweiss:


Roy - Fr 29.12.06 18:16

genau das meine ich. Jedoch sind die Auflösungen von PC zu PC unterschiedlich.
Und wie muss ich den von Ihnen gezeigten Quelltext einsetzen?


Marco D. - Fr 29.12.06 18:17

user profile iconRoy hat folgendes geschrieben:
genau das meine ich. Jedoch sind die Auflösungen von PC zu PC unterschiedlich.
Und wie muss ich den von Ihnen gezeigten Quelltext einsetzen?

Im OnCreate oder im OnShow.


mpth - Fr 29.12.06 18:19

um die eventuell vorhandene taskbar am unteren rand nicht zu überdecken, bietet sich vielleicht folgendes an:


Delphi-Quelltext
1:
2:
3:
4:
5:
procedure TForm1.FormShow(Sender: TObject);
begin
  Left := Screen.WorkAreaWidth - Width;
  Top := Screen.WorkAreaHeight - Height;
end;


Roy - Fr 29.12.06 18:22

user profile iconMarco D. hat folgendes geschrieben:
user profile iconRoy hat folgendes geschrieben:
genau das meine ich. Jedoch sind die Auflösungen von PC zu PC unterschiedlich.
Und wie muss ich den von Ihnen gezeigten Quelltext einsetzen?

Im OnCreate oder im OnShow.


was muss ich hierfürm eintragen?
(Programmer.HasSolution) do Programmer.AskInDF;


jakobwenzel - Fr 29.12.06 18:41

Wie wärs mit dem was hier schon 2 mal steht? :roll:


Roy - Fr 29.12.06 18:42

sorry, ja hat auch geklappt.
Danke