TWebBrowser F5 unterdrücken...

[marabu]

Hi,

das Abfangen der F5-Taste ist recht einfach, besonders wenn man statt TWebBrowser den EmbeddedWebBrowser verwendet:

Delphi-Quellcode:

function  TForm1.EmbeddedWB1TranslateAccelerator(const lpMsg: PMsg;
  const pguidCmdGroup: PGUID; const nCmdID: Cardinal): HRESULT;
begin
  // ungetestet
  if lpmsg.wParam = VK_F5 
    then result := S_OK 
    else result := S_FALSE;
end;

Aber ob das wirklich ausreicht?

Grüße vom marabu