legacy printing problem
Posted: Wed Nov 29, 2023 11:03 am
A customer of mine has converted some old Clipper code and we can't make the SET PRINTER TO OBJECT <oPrinter> work.
I found an old test program and it doesn't work either.
I'm sure it worked in the past when I wrote it.
Does anyone use SET PRINTER TO OBJECT ?
FUNCTION Main()
LOCAL oPrinter, cPrinter := 'HP OfficeJet 4650 series'
oPrinter := XbpPrinter():new():create(cPrinter)
SET PRINTER TO OBJECT oPrinter
SET DEVICE TO PRINT
@ 10,10 SAY 'This is a test'
EJECT
SET DEVICE TO SCREEN
SET PRINTER TO
RETURN nil
I found an old test program and it doesn't work either.
I'm sure it worked in the past when I wrote it.
Does anyone use SET PRINTER TO OBJECT ?
FUNCTION Main()
LOCAL oPrinter, cPrinter := 'HP OfficeJet 4650 series'
oPrinter := XbpPrinter():new():create(cPrinter)
SET PRINTER TO OBJECT oPrinter
SET DEVICE TO PRINT
@ 10,10 SAY 'This is a test'
EJECT
SET DEVICE TO SCREEN
SET PRINTER TO
RETURN nil