如何捕获小键盘数字键的输入，在线等待！！

jackzhao 2003-09-11 03:59:35

我想根据小建盘输入的数字键，如100，200，然后按enter键结束输入，这样记录就移动到相应的第100条，200条上。

...全文

89 7 打赏收藏转发到动态举报

写回复

用AI写文章

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

zousoft 2003-09-12

打赏
举报

有个问题，你是怎么区别123456是123，456而不是12，3456？

jackzhao 2003-09-12

打赏
举报

ekin 2003-09-12

打赏
举报

HOOK比较方便

jerehsofter 2003-09-12

打赏
举报

HOOK比较方便
http://www.cx66.com/cxgzs/program/delphi/102.htm

jackzhao 2003-09-12

打赏
举报

用消息捕获wm_keydown还是键盘钩子哪一种方便

上海老李 2003-09-11

打赏
举报

那你要搞个记录键的，唉，自己想想办法

lxpbuaa 2003-09-11

打赏
举报

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var
S: String;
begin
if Key = 13 then
begin
S := TEdit(Sender).Text;
if (S = '100') or (S = '200') then
ShowMessage('移动');
end;
end;

————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————