在DELPHI中如何判断某些功能键是否按下？(50分)

没

没理头号

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-27

• #1

[]在DELPHI中如何判断某些功能键是否按下？
就好比F1，F2等，还有如ALT等，我要做一键盘程序只能输入字母和数字，
但是无论是在SHORTCUT或是在KEYDOWN中捉的话功能键的值会和数字或字母的输入
值相重，好比输入F10会得到‘A’样的？哪位兄台知忘速告,不甚感激，重分相谢！

 

B

Brave

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-27

• #2

keydown事件可以,试试
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
; Shift: TShiftState);
begin
; if key=vk_f1 then showmessage('sdf');
end;

 

S

sword_liu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-27

• #3

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
; Shift: TShiftState);
begin
; if key=vk_f8 then showmessage('F8键已按下');
end;

 

没

没理头号

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-27

• #4

各位上面我都知，
但如果你在SHORTCUT中加上一句
memo1.Lines .add(inttostr(msg.charcode）
把键值打出来，你会发现好象不只一个值，而且小键盘（即键盘最右边的组键）当是输入数字时会
和功能键的值相重复，我现在就想怎么才能区分功能键和小键盘（即键盘最右边的组键）
当是输入数字时的键值，即我不想让按功能键时时激活我的程序；

 

没

没理头号

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-14

• #5

接受答案了.