...disable ctrl+N in TWebbrowser?

Author: Thomas Stutz

Category: Internet / LAN

// Put a TApplicationEvents component on your form and assign a OnMessage event handler:

procedure TfrmMyBrowser.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
  
// check if Ctrl-N pressed
  
if (GetKeyState(VK_CONTROL) < 0) and (Msg.Message = WM_KEYDOWN) and
    
(Msg.wParam = Ord('N')) then
  begin
    
Handled := True;
  end;
end;


 

printed from
www.swissdelphicenter.ch
developers knowledge base