如何模拟按下问号键??? 40分(40分)

P

psstudio

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-31

• #1

不知道问号键盘的伪码,用keybd_event来实现 .请教!!!

 

Z

zbr

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-31

• #2

用KeyDown 或KeyPress测试一下。

 

中

中国最猥琐的程序员

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-31

• #3

貌似是63吧

 

T

TENTODBV

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-31

• #4

63
Form1.KeyPreview:=true;

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
ShowMessage(inttostr(Ord(Key)));
end;

 

P

psstudio

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-31

• #5

keybd_event(63,0,KEYEVENTF_EXTENDEDKEY or 0,0);
这样可以吗??
问号是上档键....测试不出来..

 

W

weiliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-31

• #6

这个应该无解，
只有用SENDMESSAGE或POSTMESSAGE。

 

L

lihoulong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-08-01

• #7

keybd_event(vk_shift, MapVirtualKey( vk_shift, 0 ), 0 , 0 );
keybd_event(191, MapVirtualKey( 191, 0 ), 0 , 0 );
keybd_event(191, MapVirtualKey( 191, 0 ), KEYEVENTF_KEYUP , 0 );
keybd_event(vk_shift, MapVirtualKey( vk_shift, 0 ), KEYEVENTF_KEYUP , 0 );

 

W

weiliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-08-01

• #8

lihoulong太棒了，能解释一下为什么是191吗？