[REBOL] Re: View/Pro and accessing Windows Printer API(gdi32.dll)
From: dockimbel:free at: 29-Jun-2002 4:50
Hi,
This one seems to work but i'm not sure that the result is correct :
winspool: load/library %winspool.drv
hprinter: make struct! [address [char*]][""]
openprinter: make routine! compose/deep [
"Open Printer"
pprintername [string!]
phprinter [struct! [(first hprinter)]]
pdefault [integer!]
return: [integer!]
] winspool "OpenPrinterA"
ret: openprinter "Canon Bubble-Jet BJC-4300" hprinter 0
?? ret
print ["Handle =" to-integer to-issue enbase/base hprinter/address 16]
-DocKimbel.
Bohdan or Rosemary Lechnowsky wrote: