Declare Integer GetPrinter in WinSpool.Drv as WS_GetPrinter ; >> Integer hPrinter, ; >> Integer Level, ; >> String @pPrinter, ; >> Integer cbBuf, ; >> Integer @pcbNeeded >> >>SET PROCEDURE TO clsheap >>lnNeeded = 4096 >>lcBuffer = REPLICATE( CHR(0), lnNeeded) >>lnOK = WS_GetPrinter( lnHandle, 2, @lcBuffer, lnNeeded, @lnNeeded ) >>lcDriverName = GetMemString(DwordToNum(SUBSTR(lcBuffer,13,4))) >>