获得键盘值(28分)

lbylby · 2002-06-07

不通过keydown等事件怎么获得键盘的输入字符啊？

qdyoung · 2002-06-07

PeekMessage

zyg_zm · 2002-06-07

Shuzi · 2002-06-07

在Application.OnMessage中拦WM_KEYDOWN消息

zhenghui · 2002-06-07

applicationEvents在additition面板上 procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;   var Handled: Boolean); begin   if msg.message=wm_char then     self.Caption:=inttostr(msg.wParam); end;

zhenghui · 2002-06-07

对不起，看错了。应该写成如下代码 applicationEvents在additition面板上 根据delphi的key的值建立一个集合。如1为49，2为50 procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;   var Handled: Boolean); begin   if msg.message=wm_char then     self.Caption:=inttostr(msg.wParam);   根据wparam的值取出集合里的相应值 end;

lwaif · 2002-06-07

在WINDOWS.PAS里都有   VK_F1 = 112;   {$EXTERNALSYM VK_F2}   VK_F2 = 113;   {$EXTERNALSYM VK_F3}   VK_F3 = 114;   {$EXTERNALSYM VK_F4}   VK_F4 = 115;   {$EXTERNALSYM VK_F5}   VK_F5 = 116;   {$EXTERNALSYM VK_F6}   VK_F6 = 117;   {$EXTERNALSYM VK_F7}

lbylby · 2002-06-07

假如是在BCB中呢？

lbylby · 2002-11-18

多人接受答案了。

获得键盘值(28分)

lbylby

Unregistered / Unconfirmed

qdyoung

Unregistered / Unconfirmed

zyg_zm

Unregistered / Unconfirmed

Shuzi

Unregistered / Unconfirmed

zhenghui

Unregistered / Unconfirmed

zhenghui

Unregistered / Unconfirmed

lwaif

Unregistered / Unconfirmed

lbylby

Unregistered / Unconfirmed

lbylby

Unregistered / Unconfirmed

Similar threads