Delphi侦测条码枪方式

本文整理自网络，侵删。

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

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

相关阅读 >>

Delphi获取桌面图标

Delphi 调整应用程序内存大小

Delphi根据网络链接截取域名

Delphi system.messaging.pas例子

Delphi windows 编程[19] - 改变菜单项的状态: getmenustate、enablemenuitem

Delphi dbgrid1查询只显示50条记录修改

Delphi 破解access密码

屏幕抓取Delphi

Delphi基于sobel算子的图像边缘检测

Delphi 压缩图片算法

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

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