TWebbrowser: Text aus Frames finden

[marabu]

Hallo.

Zitat von Moyyer:

brauche befehlsreferenz

Da sollte dir das entsprechende Kapitel aus dem Windows Platform SDK weiterhelfen: klick

Hier noch ein Beispiel, wie du mit early binding auf den Inhalt eines frame zugreifen kannst:

Delphi-Quellcode:

procedure TWebForm.DemoButtonClick(Sender: TObject);
var
  doc: IHTMLDocument2;
  win: IHTMLWindow2;
  fc: IHTMLFramesCollection2;
  u: IUnknown;
  i: Integer;
  v: OleVariant;
begin
  doc := WebBrowser.Document as IHTMLDocument2;
  fc := doc.frames;
  ShowMessage(Format('frames detected: %d', [fc.Length]));
  for i := 0 to Pred(fc.length) do
  begin
    v := i;
    u := fc.item(v);
    if u.QueryInterface(IHTMLWindow2, win) = 0 then
      ShowMessage(win.document.body.innerHTML)
  end;
end;

Manchmal ist es unnötig oder sogar unerwünscht, dass der HTML-Code durch den WebBrowser gerendert wird. Dann hilft dir vielleicht die Demo zu den MSHTML markup services aus diesem thread weiter: klick

Grüße vom marabu