//判断是否NT系统 function Boolean IsWindowsNt() library 'extlib.dll' ALIAS FOR "GetUserNameA;Ansi" //获得打印机总数 function integer GetPrinterCounts() library 'extlib.dll' ALIAS FOR "IsWindowsNt;Ansi" //得到打印机名称 function string GetPrinterName(integer iIndex) library 'extlib.dll' ALIAS FOR "GetPrinterName;Ansi" /