急！！！PB 开发POS系统，怎么用USB打印机打印？

[yu_310]

我现在有一PB开发的MIS 销售系统，怎么样解决销售小票用USB打印机打印？请各位高手指教！谢谢

[pb_tjb]

你是用什麽列印方式喲?跟列印機接口有關係嗎？

[yu_310]

直接打印方式

[xlq_link]

如果USB打印机需要驱动的，要先装驱动。这USB打印机的打印方法跟普通打印机的打印应该没有很大差别的吧？

[zlf19810306]

打印机接口对pb是透明的，pb始终是调用window的打印机管理台来做打印的

[new4everlau]

[Quote=引用 3 楼 xlq_link 的回复:]
如果USB打印机需要驱动的，要先装驱动。这USB打印机的打印方法跟普通打印机的打印应该没有很大差别的吧？
[/Quote]直接调用打印就可以

[seven2015]

驱动的问题，不是程序问题。

[qq_1919561306]

//

//空一行代码:CHAR(13)+CHAR(10)

Int handle1,i
DateTime ldt

ldt = DateTime(Date(Today()),Time('00:00:00'))

i = ds_print.Retrieve(al_max_dh,ldt)

IF i = 0 THEN RETURN


handle1 = FileOpen("PRN",linemode!,Write!,lockwrite!,Replace!)

FileWrite(handle1,Char(27)+"I") //设置字体(针对EPSON绝对有效，其他类型打印机没有测试）


FileWrite(handle1,space(9) + String(ds_print2.Object.内容[1]))

FileWrite(handle1,"日期:"+String(Today(),'yyyy.mm.dd')+' 单号:'+String(al_max_dh,'000'))
string ls_user,ls_sales
ls_user = ds_print.Object.t_user_收银员[1]
ls_sales = ds_print.Object.t_user_营业员[1]
if isnull(ls_user) then ls_user = ' '
if isnull(ls_sales) then ls_sales = ' '
FileWrite(handle1,"收银员:" +String(ls_user)+ " 营业员:" + String(ls_sales))

FileWrite(handle1,"========================================")
FileWrite(handle1,"款号 品名 颜色 尺码 数量 原价 折扣 金额")

FOR i = 1 TO ds_print.RowCount()
FileWrite(handle1,String(ds_print.Object.product_款号[i]) + ' ' + String(ds_print.Object.t_type_mc[i]) + ' ' + String(ds_print.Object.t_color_color_mc[i])+ ' ' + String(ds_print.Object.t_cm_cm_mc[i])+ ' ' + String(round(ds_print.Object.product_out_数量[i],0))+ ' ' + String(int(ds_print.Object.product_out_原价[i]))+ ' ' + String(ds_print.Object.jk[i],'0.##')+ ' ' + String(int(ds_print.Object.product_out_金额[i])))
NEXT

FileWrite(handle1,space(27) + "合计:"+String(ds_print.Object.compute_1[1],'#.00'))
FileWrite(handle1,"================="+String(now(),'hh:mm')+"=================")

FOR i = 2 TO ds_print2.RowCount()
FileWrite(handle1,String(ds_print2.Object.内容[i]))
NEXT

//FileWrite(handle1,"多谢惠顾,欢迎下次光临!")
//FileWrite(handle1,"请保管好小票,三天内保持")
//FileWrite(handle1,"货品原样凭票更换")
FileWrite(handle1,''+char(13)+char(10))
FileWrite(handle1,''+char(13)+char(10))
FileWrite(handle1,''+char(13)+char(10))
FileClose(handle1)

[lbkbox]

[lbkbox]

QQ:373817702