Moin!
- Du hast bei der Form die Eigenschaft Left und Top
- Du hast bei der globalen Instanz Screen die Eigenschaft MonitorCount und Monitors[]
- Die einzelnen TMonitor Instanzen haben wiederrum Left, Top und Width/Height als Eigenschaft.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
Var
i : integer;
begin
For i := 0 To Screen.MonitorCount-1 Do
ListBox1.Items.Add(format('Monitor %u: Left = %d, Top = %d, Width = %d, Height = %d', [i, Screen.Monitors[i].Left, Screen.Monitors[i].Top, Screen.Monitors[i].Width, Screen.Monitors[i].Height]));
end;
Damit sollte sich doch dann schon alles lösen lassen.
MfG
Muetze1