anchor.diff:  
   type
     TfrmKeyboardOptions = class(TfrmWebContainer)
  -    procedure webBeforeNavigate2(ASender: TObject; const pDisp: IDispatch;
  -      var URL, Flags, TargetFrameName, PostData, Headers: OleVariant;
  -      var Cancel: WordBool);
  -    procedure webNewWindow3(ASender: TObject; var ppDisp: IDispatch;
  -      var Cancel: WordBool; dwFlags: Cardinal; const bstrUrlContext,
  -      bstrUrl: WideString);
     private
       kbd: IKeymanKeyboardInstalled;
       FKeyboardName: WideString;
  
positive.code:   s := ExtractFilePath(kbd.OwnerPackage.Filename) + 'options.htm' + s;
  
    cef.Navigate(s);
  {$MESSAGE HINT 'TODO: Override the onbeforenavigate'}
  //  web.OnBeforeNavigate2 := nil;
  //  v := navNoHistory or navNoReadFromCache or navNoWriteToCache;
  //  web.Navigate(s, v);
  //  web.OnBeforeNavigate2 := webBeforeNavigate2;
  end;
  
  procedure TfrmKeyboardOptions.WMUser_ContentRender(var Message: TMessage);
  
negative.code:     procedure WMUser_ContentRender(var Message: TMessage); message WM_USER_ContentRender;
      procedure DoNavigate;
    protected
      procedure FireCommand(const command: WideString; params: TStringList); override;
  
    public
  