Ist doch ganz einfach und bei unterschíedlichen Bildschirmgrößen oder Bildschirmauflösungen garantiert unbrauchbar
Gehen wir davon aus, dass die Bildschirme nebeneinander stehen:
Delphi-Quellcode:
Self.Width := 0;
Self.Height := Screen.Heigth;
for i := 0 to Screen.MonitorCount -1 do begin
Self.Width := Self.Width + Screen.Monitors[i].Width;
Self.Height := Min(Self.Height,Screen.Monitors[i].Height);
end;
Sind sie übereinander angeordnet, müssen Width und Height vertauscht werden.
Bei 'ner aus mehreren Bildschirmen neben- und übereinander aufgebauten Fläche, klappt das natürlich nicht. Dann muss man wissen, wieviele Bildschirme über- bzw. nebeneinander angeordnet sind.
Beschreibe doch bitte einfach erstmal, wofür Du die Problemlösung suchst und von welchen Gegebenheiten wir bei der Lösungssuche ausgehen müssen.
Zahl der Bildschirme, Art der Bildschirme?
z. B. Aus Bildschirmen bestehende "Leinwand" von 8 * 4 Bildschirmen, wobei alle Bildschirme vom gleichen Hersteller und vom gleichen Typ sind.
Wild zusammengewürfeltes Sammelsorium von Bildschirmen.
Keine Ahnung, über wieviele Bildschirme der Softwarenutzer verfügt, welche Modelle und / oder wie sie angeordnet sind.
...