Alle Element IDs von Webseite listen

[Seki99]

Hey, ich habe ein problem , undzwar hat einer eine idee wie ich alle Element ids einer webseite bei nutzung der twebbrowser komponente , in eine rlistbox anzeige?

bin für jede hilfe dankbar!

[lbccaleb]

Hilft dir das vllt. weiter??

http://delphi.cjcsoft.net/viewthread.php?tid=43297

[Seki99]

Leider nicht wirklich , sowas ähnliches wie "function GetFrameByID" benutze ich bereits , jedoch würd ich zuerst gerne eine liste aller elemente in einer listbox eintragen, und wie diese heißen , ist von mal zu mal unterschiedlich.

[Volker Z.]

Hallo,

wenn ich Dich richtig verstehe, dann suchst Du etwas in dieser Richtung:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  d : IHTMLDocument2;
  i : Integer;
  e : IHTMLElement;
begin
  if not Assigned (WebBrowser1.Document) then
    Exit;

  d := WebBrowser1.Document as IHTMLDocument2;
  if not Assigned (d) then
    Exit;

  for i := 0 to d.all.length - 1 do
    begin
      e := d.all.item (i, '') as IHTMLElement;
      if Assigned (e) and (e.id <> '')then
        ListBox1.Items.Add (e.id)
    end
end;

Gruß

[Seki99]

Danke, das funktioniert tadellos. Problem Solved :)

[Seki99]

EDIT: Problem selber gelöst , ich sollte mal mein hirn einschalten , danke nochmal, thread kann geschlossen werden