Im Webbrowser mit Tab navigieren

[toms]

Hallo

Setze den Focus zuvor auf den Body des Documents:

Delphi-Quellcode:

uses
  MSHTML;

procedure SetFocusToBody(Webbrowser: TWebbrowser);
var
  bodyElement: IHTMLElement2;
  HTMLDoc2: IHTMLDocument2;
begin
  if Supports(Webbrowser.Document, IHtmlDocument2, HTMLDoc2) then
  begin
    bodyElement := HTMLDoc2.body as IHTMLElement2;
    if Assigned(bodyElement) then
      bodyElement.focus;
  end;
end;