как програмно поменять размер страницы принтера

← →
Big_Rom (2002-12-27 20:21) [0]

собственно и все :))

← →
Alex Konshin (2002-12-29 05:55) [1]

Я выложил файлик:
http://home.earthlink.net/~akonshin/files/PrintLib.pas

Проблема на самом деле в том, что в Delphi нет(не было?) честного способа получить handle принтера. По крайней мере в Delphi5 приходится доставать его хакерскими методами. Именно это и делается в этом модуле. Насколько я понял, требуется поменять форму? Хотя не важно, имея handle, можно сделать все, что вообще возможно. Да, на Delphi7 не проверял (ну не пишу я уже на Delphi, ну почти не пишу). Хотя, сейчас заглянул в printers.pas, вроде должно работать и в Delphi7, да и честного способа как не было, так и нет.

← →
Big_Rom (2002-12-29 06:16) [2]

to Alex Konshin
я так понял одно ваозвращяет список доступных страниц
другая их утанавливает
procedure GetPrinterForms( const hPrinter : THandle; AFormNames : TStrings );
procedure SetPrinterForm( const AFormName : String );

с наступающим

← →
Alex Konshin (2002-12-29 06:32) [3]

Угу

как програмно поменять размер страницы принтера Найти похожие ветки