Как узнать количество точек на дюйм для принтера

     VertPixelsPerInch := GetDeviceCaps(Printer.Handle, LogPixelsX);
     HorzPixelsPerInch := GetDeviceCaps(Printer.Handle, LogPixelsY);

Другое по теме:

• Escape код PASSTHROUGH
• Вместо печати графики использовать резидентный шрифт принтера
• Вывести все способы подачи бумаги для печати