Hello Victor, I am now confirmed about my doubt :-)
My final "problem free" demo sample is:- 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 SET PRINTER TO @ ROW(), 0 SAY "Press any key to continue..." INKEY( 0 ) RETURN NIL BTW, my today's experience also solved some printing problem my old software, developed with xHarbour+gtwvw ;-) Thanks a lot. With best regards. Sudip -- View this message in context: http://www.nabble.com/Printing-Problem-tp23696757p23852259.html Sent from the Harbour - Dev mailing list archive at Nabble.com. _______________________________________________ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour