TChromium如何抓住OnMiddleMouseClick事件?

时间:2013-07-31 15:54:56

标签: delphi delphi-xe3 tchromium

我需要在新标签中打开链接,如果用鼠标中键按下,但TChromium中没有事件,比如OnMouseDown或者其他。 只有OnPreKeyEvent和OnKeyEvent,但它不是我需要的。 我几乎试图用这个事件来抓住这个点击,如下所示:

procedure TForm1.ChromiumPreKeyEvent(Sender: TObject;
  const browser: ICefBrowser; const event: PCefKeyEvent; osEvent: PMsg;
  out isKeyboardShortcut, Result: Boolean);
begin
  If(event.windows_key_code=13) Then
  ShowMessage('ENTER PRESSED PRE KEY EVENT : '+inttostr(event.windows_key_code))
end;

但它完全没有使用鼠标按钮。 有人可以帮我这个吗? 感谢。

0 个答案:

没有答案