作者：吹水佬

DECLARE long GetDefaultPrinter IN winspool.drv string@,long@
nlen = 0
GetDefaultPrinter(NULL, @nLen)
cName = SPACE(nLen)
IF GetDefaultPrinter(@cName, @nLen) != 0
    ? LEFT(cName,nLen-1)
ELSE
    ? "没有默认打印机"
ENDIF