Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Using DOS printer control command in VFP
Message
From
04/06/2001 23:28:11
 
 
To
31/05/2001 17:35:34
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00513473
Message ID:
00514932
Views:
20
I made the printer as Generic/Text printer.
and send the prg code for printing but never printing right way but just print code itself.

For example

??chr(27)+'!'+chr(48) &&double-width+height

suppose to start to print double width and height, but just print chr(27)+'!'+chr(48).

If you have any solutin please help me.

These are the sample code if it helps your understanding.

*****************************************************
function header5(mlname,mreceiptno,mcustno,mfname,jobdisc)
*****************************************************
local cAdr2:=icity+", "+ist+" "+izip
local maddress:=iaddress

set console off
set device to print
set print on

&& ??chr(27)+'!'+chr(32) &&double-width

??chr(27)+'!'+chr(48) &&double-width+height
??space(7)+mreceiptno
??"-"+jobdisc

?
?
?? space(br_center(icompany, 20)) + icompany
??chr(27)+'!'+chr(0) &&double-width cancel

?
@prow(),br_center(maddress, 40) say maddress
?
@prow(),br_center(cAdr2, 40) say cAdr2
?
@prow(),br_center(iphone, 40) say iphone
?replicate('=',40)
?
??chr(27)+'!'+chr(16) &&double-height
??" Ticket No: "
??chr(27)+'!'+chr(48) &&double-width+height
?? mreceiptno
??"-"+jobdisc
??chr(27)+'!'+chr(0) && double-width+height end
?

if minvtype="T"
??chr(27)+"\"+chr(50)+chr(0)
??chr(29)+"w"+chr(2)
??chr(29)+"h"+chr(60)
??chr(29)+"k"+chr(4)+mreceiptno+chr(0) && barcode printing
?
endif

mpname=trim(mlname)+iif(len(trim(mfname))>0,","+subs(mfname,1,1)," ")
??chr(27)+'!'+chr(16) && double-width+height end
?? " Name: "
??chr(27)+'!'+chr(48) && double-width+height
??substr(mpname,1,18)
?
?
??chr(27)+'!'+chr(16) && double-width+height end
?? " Cust No: "
??chr(27)+'!'+chr(48) && double-width+height
??mcustno
??chr(27)+'!'+chr(0) && double-width+height end

?replicate('=',40)
?

set print off
set device to screen

return NIL && header5()
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform