在Form的Onkeyup事件中,参数Key,为按键值:
vkMenu:菜单键
vkHardwareBack:back键
更详细的键定义在System.UITypes单元。
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
var KeyChar: Char; Shift: TShiftState);
begin
if Key = vkHardwareBack then
begin
//这里处理back键的代码
Key := 0;//处理完后清0.
end;
if Key=vkMenu then
begin
//处理menu键的代码
Key:=0;
end;
end;
关键字词: