B
baoling
Unregistered / Unconfirmed
GUEST, unregistred user!
本人在处理按键事件时,有些键不能被处理:如PAGEUP、PAGEDOWN
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case key of
VK_DELETE:Bn_ceClick(sender);
VK_END:Bn_cClick(sender);
vk_Up: FormDblClick(Sender); //PAGEUP键不能被处理
end;
end;
是何原因？请大侠赐教,谢谢！
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case key of
VK_DELETE:Bn_ceClick(sender);
VK_END:Bn_cClick(sender);
vk_Up: FormDblClick(Sender); //PAGEUP键不能被处理
end;
end;
是何原因？请大侠赐教,谢谢！
