F fengyuyang Unregistered / Unconfirmed GUEST, unregistred user! 2003-02-19 #1 我有一个程序，要求输入VIP号(条形码和数字都有)。 如何在程序中控制只能用条码阅读器输入，而禁止键盘输入？ 谢谢！
S SEVN Unregistered / Unconfirmed GUEST, unregistred user! 2003-02-20 #2 当输入框获得焦点后，在它的OnKeyPress里写： procedure TForm1.DBEdit1KeyPress(Sender: TObject; var Key: Char); begin key := #0; end;
当输入框获得焦点后，在它的OnKeyPress里写： procedure TForm1.DBEdit1KeyPress(Sender: TObject; var Key: Char); begin key := #0; end;
