怎样表示默认打印机？

Question

printer.printers可以得到打印机列表
printer.printerINDEX可以设当前打印机
printer.printerINDEX:=-1可以恢复默认打印机

Answer 1

其中w i n d o w s节的d e v i c e键中指明了当前系统中默认打印机的信息。可以通过Windows API
函数G e t P r o f i l e S t r i n g获取该信息。函数G e t P r o f i l e S t r i n g的原型如下：
DWORD GetProfileString(
LPCTSTR lpAppName, // 指定节名的字符串
LPCTSTR lpKeyName, // 指定键名的字符串
LPCTSTR lpDefault, // 没有找到键名时返回的字符串
LPTSTR lpReturnedString, // 在键名找到时返回的字符串
DWORD nSize // lpReturnedString的字节数
) ;

Answer 2

if printer.PrinterIndex=0 then showmessage('未安装打印机，不能打印');

Answer 3

为什么printer出错？未定义！在USES里加什么？

Answer 4

printer出错啊！应该uses什么单元？