Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#7

Re: Pixel in cm umrechnen

  Alt 15. Sep 2004, 16:40
Zitat von Meflin:
ähm lieg ich falsch oder sind da nur funktionen für die andere richtung drin?
(mm -> pixel)
Stimmt schon. Diese Unit dient dazu, Druckerausgaben in mm oder Inches zu designen und
auf den Printer Canvas in Pixel umzurechnen.
Die Gegenrichtung sollte recht einfach sein (Kehrwert bilden):
Delphi-Quellcode:
function ConvertPixelstoMMX(const Value:Integer):Double;
begin
   Result := Value / GetPrinterRes(Printer, True) * mmPerInch;
end;

function ConvertPixelstoMMY(const Value:Integer):Double;
begin
   Result := Value / GetPrinterRes(Printer, False) * mmPerInch;
end;
Andreas
  Mit Zitat antworten Zitat