[分享]深入分析打印设置 PrtDevMode、PrtDevNames 和 PrtMip [会让你头大]

lynnwang

roych 发表于 2012-9-22 00:28
我觉得，对于大多数用户而言，并不需要要设置打印机很多参数的，利用内置的打印机对象，又或者在Access里设 ...

是的，基本上[Printer]对象足以应付打印设置了。

其实[Printer]类，它本身就是对 PrtDevMode、PrtDevNames 和 PrtMip这三参数来进行封装操作的。

注意；PrtDevMode、PrtDevNames 和 PrtMip这三个就是[窗体]和[报表]的属性来着

lynnwang

这里贴出来 PrtDevMode、PrtDevNames 和 PrtMip这个三参数，是为以后大家认为[Printer]满足不了要求，在这里作个说明与提示

因为这里PrtDevMode、PrtDevNames这两个参考其实就是AP所返回的打印设备的数据。
因为其中要返的字符串，所以这里就涉及到UNICODE与ANSI的转换了。
我们看看例4中的定义：  TCHAR dmDeviceName[CCHDEVICENAME];
TCHAR：具体不说了，百度百科有详解。
所以这里[窗体]和[报表]的属性返回的字符串值全部为ANSI码
而转到VBA中全部为UNICODE

这里看看例3与例1对比就知道了，一个是64个字节声明，一个是32字节数组声明
为什么一个是64字节，一个是32字节，因为api的 char 到VB的string会转换到UNICODE，而字节数组却不会自动转换

以上就是关键点，提个醒，大家用到时再看看

lynnwang

所以大家看出来了，例2中声明，就有问题了——总共就32个字节怎么存得下，只有往后移了。
为什么作者通过了，就不得而知了（他的代码我没测试），我在自己代码中改过后不能通过。

t小宝

我用第2种声明方式 ... strDeviceName As String * 16 ...，可以设置纸张大小、页边距等

t小宝

帮助中说 type_DEVMODE 结构的 intScale 项可以设置页面缩放，我测试是设置不了的。

huangli0356

牛人的牛作...现在还不太明白...继续努力学习..