Need to know current printer PPI

[GfxBro]

How to get printer PPI? I'm using TPrintPreview. I know how to get vert/hor DPI, but don't know how to PPI?

[Kambiz]

Does PPI stand for pixels per inch?

[GfxBro]

Yes, pixels per inch or pixel density. I checked formula here:

http://en.wikipedia.org/wiki/Pixel_density

and wrote this:

Code: Select all

  dp := Round(Sqrt(Sqr(PrintPreview1.PageDevicePixels.X) + Sqr(PrintPreview1.PageDevicePixels.Y)));
  di := Round(Sqrt(Sqr(PrintPreview1.PageDevicePixels.X div GetDeviceCaps(PrintPreview1.Printer.Handle, LOGPIXELSX)) + Sqr(PrintPreview1.PageDevicePixels.Y div GetDeviceCaps(PrintPreview1.Printer.Handle, LOGPIXELSY))));
  ppi := dp div di;

but looks to be wrong

[Kambiz]

DPI and PPI are synonyms.

PrintPreview works independent of printer's resolution.