-
本版专家分：10结帖率 100% -
特别是自定义纸张大小﹗
nPaperWidth := GetDeviceCaps(Printer.Handle, PHYSICALWIDTH) div GetDeviceCaps
(Printer.Handle, LOGPIXELSX) * 254;
nPaperHeight := GetDeviceCaps(Printer.Handle, PHYSICALHEIGHT) div GetDeviceCaps
(Printer.Handle, LOGPIXELSY) * 254;
上面的写法为什么会提示﹕
Incompatible types: 'HDC' and 'QPaintDeviceH'
GetDeviceCaps后面的参数该如何带?
![]()
-
本版专家分：10260
-
- 蓝花 2004年12月 Delphi大版内专家分月排行榜第三
-
-
wsheet.pagesetup.PaperSize:=PaperSizeMetrics[PaperSize];
-
本版专家分：10
-
我是要将数据输出到用户做的模板文件﹐并要进行分组处理﹐所以要抓取模板文件的纸张高度计算每页要打多少行﹐而不要设置纸张的尺寸﹗
PaperSizeMetrics[PaperSize]这个东东Delphi里没有啊﹗
-
本版专家分：10
-
nPaperHeight := GetDeviceCaps(HDC(Printer.Handle), PHYSICALHEIGHT)
用这种方式可以编译过﹐但抓出来的数值却等于0﹗