Hi Victor,
Thank you very much. I am now able to run win_prn() :-)
But I cannot solve my initial problem with simple Clipper type text printing
with DMP (printer halts).
Here is a sample for it :-
FUNCTION Main()
LOCAL nChar := ASC( "A" )
CLEAR SCREEN
SET DEVICE TO PRINTER
SETPRC( 0, 0 )
DO WHILE nChar <= ASC( "Z" )
@ PROW() + 1, 0 SAY REPLICATE( CHR( nChar ), 75 )
nChar ++
ENDDO
EJECT
SET DEVICE TO SCREEN
@ ROW(), 0 SAY "Please check if your printer prints after pressing any
key"
@ ROW()+2, 0 SAY "Press any key to continue..."
INKEY( 0 )
RETURN NIL
TIA.
With best regards.
Sudip
--
View this message in context:
http://www.nabble.com/Printing-Problem-tp23696757p23830506.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
