关闭

打开钱箱的操作方法

528人阅读 评论(0) 收藏 举报
USB端口,可以当COM口操作的。直接用COM控件往端口写数据就行了。
我用的是SPcomm控件。
var
  tmpStr: string;
  esc: TOutBufPassThrough;
begin
  cm1.CommName := edt1.Text;
  cm1.StartComm;
  begin
    cm1.WriteCommData(PChar(tmpStr), Length(tmpStr));
    cm1.WriteCommData(#13#10, 2); //加了这行,才会打印
  end;
  Sleep(500);
  cm1.StopComm;
end; 
0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:126860次
    • 积分:3358
    • 等级:
    • 排名:第10432名
    • 原创:215篇
    • 转载:21篇
    • 译文:1篇
    • 评论:3条
    最新评论