Delphi-PRAXiS - Delphi Web Dropdown auswählen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Netzwerke (https://www.delphipraxis.net/14-netzwerke/)

- - Delphi Web Dropdown auswählen (https://www.delphipraxis.net/48179-web-dropdown-auswaehlen.html)

Web Dropdown auswählen

Hi,

wie kann ich im WebBrowser1 ein DropDown einer Seite auswählen ? Also etwas anderes wählen als das Standart ausgewählte

Re: Web Dropdown auswählen

Auf der Google-Seite zum erweiterten Suchen ist ein SelectionElement mit name="num" zur Einstellung der Suchergebnisse pro Seite. Mit dem folgenden Code schaltest du von einer Option zur nächsten.

Delphi-Quellcode:

			uses

  MSHTML;

procedure TWebForm.StepButtonClick(Sender: TObject);

var

  doc: IHTMLDocument2;

  sel: IHTMLSelectElement;

  iOptions: integer;

begin

  doc := WebBrowser.Document as IHTMLDocument2;

  sel := doc.all.item('num', 0) as IHTMLSelectElement;

  iOptions := sel.length;

  sel.selectedIndex := Succ(sel.selectedIndex) mod iOptions;

end;

Grüße vom marabu