Pixel in Millimiter umrechnen mit dieser Funktion ?

[himitsu]

Du hast halt bei allen Rechnungen immer mindestens eine Rundung der Werte drin.
Und demnach ergeben sich unterschiedliche Ergebnisse.
also wenn's möglichst genau sein soll, dann entweder SetMapMode, da sind die Ungenauigkeiten über den gesamten "Monitor" verteilt, oder du Rundest nur einmal und das ganz weit zum Schluß der Rechnung.


wenn du nur einen Monitor hast,
oder alle Monitore die gleiche Auflösung haben und gleich groß sind,
bzw. alle Monitore das gleiche Auflösungsverhälnis (DPI) haben:

Delphi-Quellcode:

var h: hDC;
  hres, vres, hsiz, vsiz: Integer;

h := GetDC(GetDesktopWindow);
hres := GetDeviceCaps(H, HORZRES);
vres := GetDeviceCaps(H, VERTRES);
hsiz := GetDeviceCaps(h, HORZSIZE);
vsiz := GetDeviceCaps(h, VERTSIZE);
ReleaseDC(GetDesktopWindow, h);

Balken5cmBreit := hres / hsiz * 50;

wenn es mehrere unterschiedliche Monitore gibt:

Delphi-Quellcode:

var h: hDC;
  hres, vres, hsiz, vsiz: Integer;

i := AufWelchemMonitorLiegtDerBalken;
h := GetDC(Screen.Monitors[i].Handle);
hres := GetDeviceCaps(H, HORZRES);
vres := GetDeviceCaps(H, VERTRES);
hsiz := GetDeviceCaps(h, HORZSIZE);
vsiz := GetDeviceCaps(h, VERTSIZE);
ReleaseDC(Screen.Monitors[i].Handle, h);

Balken5cmBreit := hres / hsiz * 50;

[taaktaak]

Moin, Moin.
Nach meiner persönlichen Erfahrung ist - egal wie man es anstellt - nicht gewährleistet, dass man für Monitore immer ein korrektes Ergebnis bekommt. Für Drucker habe ich's noch nicht ausprobiert. In der Konsequenz muss, wenn eine absolut korrekte Millimeter-Darstellung notwendig ist, das Programm die Möglichkeit einer Kalibrierung (aspect ratio) bieten.

// hier wurde das Problem ebenfalls diskutiert

[himitsu]

Zitat von taaktaak:

Moin, Moin.
Nach meiner persönlichen Erfahrung ist - egal wie man es anstellt - nicht gewährleistet, dass man für Monitore immer ein korrektes Ergebnis bekommt. Für Drucker habe ich's noch nicht ausprobiert. In der Konsequenz muss, wenn eine absolut korrekte Millimeter-Darstellung notwendig ist, das Programm die Möglichkeit einer Kalibrierung (aspect ratio) bieten.

jupp, nimm mal 'nen Beamer und verschieb diesen 'nen Zentimeter

bei Druckern isses heutzutage eigentlich Recht genau, vorallem wenn man im Milimeterbereich arbeitet,
da de Drucker ja 'ne sehr hohe Auflösung besitzt (da hält sich der Rundungsfehler in Grenzen und mit SetMapMode kann man auch da den Rundungsfehler schön leicht auf den ganzen Druckbereich verteilen)

und wenn die Maße/DPI nicht richtig eingestellt sind, dann klapp's eh nicht.

[Anonymos]

gut'n Mittag

Ich würde gerne die Bildschirminformationen meiner Bildschirme einzeln / getrennt abfragen.

Dazu habe ich hier im Forum schon volgenden Code gefunden:

Delphi-Quellcode:

DC := GetDC(screen.Monitors[i].Handle);
hSize := GetDeviceCaps(DC, HORZSIZE);

Blöderweise funzt das bei mir so überhauptnicht.
Ich bekomme da als hSize immer 0
(Was warscheinlich heißt, dass das DC nicht stimmt)

Wenn ich statt "screen.Monitors[i].Handle"
Das Handle meines Forms verwende: "Form1.Handle"
dann bekomm ich die richtige Größe (Nachgemessen, stimmt)

Warum ist nun das Handle des Monitors über Screen falsch?

Danke für jede Hilfe