Pixel in Millimeter umrechnen

[Luckie]

Ich muss noch mal dumm fragen. wie bekomme ich Millimeter in Pixel? Ich habe eine DIN-A4 Seite dies soll auf dem Monitor dargestellt werden. Die Größe ist in Millimetern angegeben (197 x 290), wie komme ich jetzt davon auf die Pixel?

Bisher habe ich:

Delphi-Quellcode:

  // Wie viel Pixel sind ein Millimeter?
  ppm := GetDeviceCaps(GetDC(0), LOGPIXELSX) / 25.4;
  // Seitengröße in Pixel umrechnen
  Page.Width := Round(Page.Width * ppm);
  ShowMessage(IntToStr(Page.Width));

Da kommt 745 Pixel raus. Mein Monitor hat aber eine Auflösung von 1280 x 1024 und ein DinA-4 Blatt ist höher als 1024 Pixel, wenn ich es vor den Monitor halte.