请教﹕如何获取Excel文件用户定义的纸张尺寸大小﹖

scott21cn 2004-11-26 11:57:35
特别是自定义纸张大小﹗

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后面的参数该如何带?

...全文
127 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
scott21cn 2004-11-26
  • 打赏
  • 举报
回复
UP!
scott21cn 2004-11-26
  • 打赏
  • 举报
回复
nPaperHeight := GetDeviceCaps(HDC(Printer.Handle), PHYSICALHEIGHT)
用这种方式可以编译过﹐但抓出来的数值却等于0﹗
scott21cn 2004-11-26
  • 打赏
  • 举报
回复
我是要将数据输出到用户做的模板文件﹐并要进行分组处理﹐所以要抓取模板文件的纸张高度计算每页要打多少行﹐而不要设置纸张的尺寸﹗
PaperSizeMetrics[PaperSize]这个东东Delphi里没有啊﹗
bee2518 2004-11-26
  • 打赏
  • 举报
回复
wsheet.pagesetup.PaperSize:=PaperSizeMetrics[PaperSize];

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧