Wenn ich versuche die MSN Seite über TWebBrowser zu laden passiert etwas sehr sonderbares. Die Body - Eigenschaft ist NIL. Bei der Entwickler Seite und anderen Seiten klappt es prima.
<br><pre><font size="1" face="Verdana">
procedure TForm1.WebBrowser1NavigateComplete2(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);
var
HTMLText : TStringList;
vHTML : OleVariant;
Doc2 : IHtmlDocument2;
Body : IHtmlElement;
begin
HTMLText:=TStringList.Create;
Try
Doc2:=WebBrowser1.Document as IHtmlDocument2;
Body:=Doc2.scripts.item('body',EmptyParam) as IHtmlElement;
ShowMessage(Doc2.body.innerHTML); // Bei der MSN Seite ist Body hier nil, bei der Entwickler Seite nicht !!!
Finally
HTMLText.Free;
end;
end;
</font></pre>
Daher vermute ich, das es irgendetwas im HTML Code der MSN Seite gibt, dass die Body Interface auf nil setzt. Aber was, weiß ich noch nicht<br>Jens Schuman
Comment