TPrint的Pagewith奇怪问题

Question

我现在用普通打印机来打印图片.想有预览功能.
小弟现在的方法是使用Image控件,把想要打印的图形先显示出来,但是获得打印机纸张的高度和宽度(方法是:printer.pageheight和printer.pagewidth).但是这两个值都是pix值,而且太大,如Image获得这样的长度和宽度则太大,如缩小为1/8则可能误差太大,可不可以获得纸张的长度和高度(单位是mm)?如可以用什厶方法?

Answer 1

使用getdevicecaps(printer.handle,?)我忘了参数了,得到分辨率,或者pageheight div image1.height 得到一个比率,然后利用这值做响应的修改,试一试,