delphi 获取打印机默认纸张_Delphi 动态调整打印机纸张大小

修

改与当前打印机相关的DevMode 结构中的成员。DocumentProperties 函数申明如下：

Delphi代码

LONG DocumentProperties

(

HWND　　　 hWnd,

HANDLE　　 hPrinter,

LPTSTR　　　pDeviceName,

PDEVMODE　pDevModeOutput,

PDEVMODE　pDevModeInput,

DWORD　　 fMode

);

LONG DocumentProperties

(

HWND　　　 hWnd,

HANDLE　　 hPrinter,

LPTSTR　　　pDeviceName,

PDEVMODE　pDevModeOutput,

PDEVMODE　pDevModeInput,

DWORD　　 fMode

);

六个参数中只有pDevModeOutput 是输出变量，其余五个参数必须由程序给出具体值。其中，hWnd 表征当前窗口的句柄值；hPrinter 表示当前打印机的句柄；pDeviceName 是对打印机设备的描述；pDevModeOutput 是指向句柄值为hPrinter 的打印机DevMode 结构的指针；pDevModeInput 是指向一个修改后的DevMode 结构的指针，该结构有待于被句柄值为hPrinter 的打印机接受；fMode 定义了该函数的具体功能，如果取值DM_IN_BUFFER 那么表示打印机接受由参数pDevModeInput 表示的由程序修改了的DevMode 值，如果取值DM_OUT_BUFFER 那么程序可以通过参数pDevModeOutpu