TWebBrowser Quelltext von iFrame auslesen

[Jacques Murell]

Hi,

ich zeige eine Webseite im TWebbrowser an und lasse mittels

Delphi-Quellcode:

function xyz(Webbrowser: TWebBrowser): String;

var

  aHTMLDoc   : IHTMLDocument2;

  aHTMLBody  : IHTMLElement;

  swHTMLText : WideString;

begin

  if not VarIsEmpty(WebBrowser.Document) then

    begin

      aHTMLDoc := WebBrowser.Document as IHTMlDocument2;

      aHTMLBody := aHTMLDoc.Get_body;

      swHTMLText := aHTMLBody.outerHTML;

      result := swHTMLText;

    end;

end;

mir den Webseitenquelltext anzeigen. Klappt auch alles wunderbar, bis auf den Fall wenn in der Webseite ein iframe mittels:

Delphi-Quellcode:

<iframe src="quelle.php" width="200" height="200" frameborder="0">
    <p><code>iframe</code>-Element wird nicht unterst&uuml;tzt bzw. die <a href="quelle.htm">Quelle</a> ist nicht verf&uuml;gbar.</p>
</iframe>

eingebaut wird. Dann bekomme ich logischerweise nur diesen Code und nicht den Quelltext des iFrames zu sehen, genau den bräuchte ich aber.

Wie kann ich den Quelltext eines iFrames anzeigen lassen ohne den Frame separat zu laden? Der Webbrowser zeigt ihn ja auch an (den Frame), also muss er ja schon geladen sein, wie komme ich an den Quelltext? Vielen Dank schonmal.