去哪里查？ ( 积分: 50 )

J

jjqqw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-09

• #1

问题一： <br>hotkeyid:=GlobalAddAtom(pchar('My Hotkey'))-$C000;<br> &nbsp;registerhotkey(handle,hotkeyid,MOD_CONTROL or mod_Alt,$4D);<br>以上代码是注册ctrl+alt+m为系统热键,$4D代表m？从哪里查找其含义呢？<br>问题二：<br>比如我要做一个与<br>procedure TForm2.Edit1KeyDown(Sender: TObject; var Key: Word;<br> &nbsp;Shift: TShiftState);<br>begin<br> &nbsp; showmessage(inttostr(key));<br>end;<br>相反的过程应该如何做？有具体代码最好。

 

J

jjqqw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-09

• #2

问题一： <br>hotkeyid:=GlobalAddAtom(pchar('My Hotkey'))-$C000;<br> &nbsp;registerhotkey(handle,hotkeyid,MOD_CONTROL or mod_Alt,$4D);<br>以上代码是注册ctrl+alt+m为系统热键,$4D代表m？从哪里查找其含义呢？<br>问题二：<br>比如我要做一个与<br>procedure TForm2.Edit1KeyDown(Sender: TObject; var Key: Word;<br> &nbsp;Shift: TShiftState);<br>begin<br> &nbsp; showmessage(inttostr(key));<br>end;<br>相反的过程应该如何做？有具体代码最好。

 

Z

zbird

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-09

• #3

Ctrl+hotkeytotext()（函数名不是很确定，请查看help验证一下）<br>看看那几个和hotkey相关的函数是怎么实现的，应当会有些收获。<br><br>注：先在窗体上放个menu，因为这个函数在menu相关的那个包里面。

 

H

hxb_leiyuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-10

• #4

找个ASCII表一看就可以了

 

J

jjqqw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-10

• #5

hotkeytotext? 有这个函数？ 我都找遍了,没这个函数.

 

Z

zbird

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-10

• #6

那应该是shortcuttotext了。[]

 

J

jjqqw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-11

• #7

各位帮忙看看

 

J

jjqqw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-12

• #8

shortcuttotext is a funcation that Converts a menu shortcut into a string that describes the shortcut.<br><br>可$4D是什么意思呢

 

Z

zbird

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-13

• #9

我的意思是叫你去看一下shortcutotext的代码。<br>ShowMessage(shortcuttotext($4d));<br>$4d代表字符M。

 

J

jjqqw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-13

• #10

多人接受答案了。