Hab hier leider nur einen Monitor. Aber versuch doch mal folgendes...
Delphi-Quellcode:
var DC:hwnd;
hSize, Width:cardinal;
i:integer;
begin
DC := GetDC(0);
hSize := GetDeviceCaps(
DC, HORZSIZE);
Width:=0;
for i:=1
to Screen.MonitorCount
do
Width:=Width + Screen.Monitors[i-1].Width;
for i:=1
to Screen.MonitorCount
do
ShowMessage(inttostr(i) + '
. Monitor: ' + inttostr(round((hSize / Width) * Screen.Monitors[i-1].Width)));
ReleaseDC(
DC, 0);
end;
Der Desktop ist ein großes Bitmap und der Zugriff erfolgt mit GetDC(0).
Ist nur so eine Idee...