MainForm有个属性MonitoredKeys,用来处理捕获用户在浏览器中的按键。
具体的用法:
如下图:
然后在Keys定义要捕获的按键,下图我定义一个按钮 27,即ESC键:
之后,我们就可以MainForm的OnKeyDown事件中来根据用户的按键来写代码了:
procedure TMainForm.UniFormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key=VK_ESCAPE then begin HideFullScreenReport; end; end;
存在的问题,当显示一个urlFrame,焦点在他上面时,不会触发OnKeyDown事件,从而定义的按键无法捕获到了!无解中...