FORM中的ONKEYDOWN事件触发不了,用得键位是F5,但是EDIT的ONKEYDOWN实践是可以的,为什么,高手请帮忙,谢谢
相关代码
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if ( (key = VK_F5) and (bitbtn1.Enabled = true)) then
begin
bitbtn1.SetFocus;
bitbtn1click(sender);
exit;
end;
end;
是不是FORM要更改什么书行啊
相关代码
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if ( (key = VK_F5) and (bitbtn1.Enabled = true)) then
begin
bitbtn1.SetFocus;
bitbtn1click(sender);
exit;
end;
end;
是不是FORM要更改什么书行啊
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货