Delphi侦测条码枪方式

本文整理自网络，侵删。

 
条码枪的原理其实很简单，就是一个仿键盘输入的机器。
放上一个Edit元件，接著setfocus后
在edit的keypress检查enter(#13)就行了

procedure TForm1.EdtBarcodeKeyPress(Sender: TObject; var Key: Char);
begin
  if key=#13 then begin
    // 处理EdtBarcode内容（就是刷到的条码）
  end;
end;
 

相关阅读 >>

delhi 获取进程图片

Delphi 在ms access数据库中图像的存储和显示

Delphi将excel导入access

Delphi dbnavigator1 模拟点击

Delphi padl 处理字符串的函数

Delphi调用javascript解析json

Delphi源码webbrowser多次执行documentcomplete

Delphi xe6通过wifiapi得到wifi信息

Delphi opendialog1 savedialog1 默认路径

Delphi遍历指定目录下指定类型文件的函数

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi侦测条码枪方式