以前的代码并口可以打印,可用USB转接后就不能打印了,请问
该如何修改解决
procedure TFrm.Button1Click(Sender: TObject);
var F: TextFile;
PDStr: string;
begin
try
PDStr := 'Delphi Printer on LPT1' + chr(10);
AssignFile(F, 'LPT1');
Rewrite(F);
Write(F, PDStr);
CloseFile(F);
except
Messagedlg('数据发送失败!', mterror, [mbok], 0);
end;
end;
该如何修改解决
procedure TFrm.Button1Click(Sender: TObject);
var F: TextFile;
PDStr: string;
begin
try
PDStr := 'Delphi Printer on LPT1' + chr(10);
AssignFile(F, 'LPT1');
Rewrite(F);
Write(F, PDStr);
CloseFile(F);
except
Messagedlg('数据发送失败!', mterror, [mbok], 0);
end;
end;
解决方案 »
- 关于listview控件基础问题
- 如何获得文件在局域网内的绝对地址
- delphi 窗体FREE的问题????
- 類的問題
- 关于TDXPlay的MaxPlayers
- 如何将编译好的project1.exe (最小化显示),改其他名称如ddd.exe
- quick chm出现的问题
- delphi开发webservice如何传递一个数据集?
- delphi ADOQuery if语句如何改正,目前显示“list index out of bounds(2)"
- http://www.csdn.net/expert/topic/766/766876.xml?temp=.1337854这个帖子怎么打不开啊
- ADO 链接Excle,报错:外部表不是预期的格式
- delphi7中关于自带indy中Idfpt上传的问题
你可以通过查看打印机的属性中,来获得这个端口的名称。
怎么判决打印机状态..如:打不开LTP1口,串口,打印机卡纸,缺纸,打印打没接电源...
用D怎么返回这些状态呢?
怎么判决打印机状态..如:打不开LTP1口,串口,打印机卡纸,缺纸,打印打没接电源...
用D怎么返回这些状态呢?POS协议有检测打印机忙 还是缺纸状态的指令(有便宜货连缺纸检测都没有)没接电源? 发上述指令没响应即是编码上就是从串(并)口写个字串,再读回来