Hallo,
ich hab jetzt Deinen Code nicht getestet.
Bei meinen Versuchen mit
(WebBrowser1.Document as IPersistFile).Save('c:\temp\test.html', True);
hat es auch nicht funktioniert, da holt er wohl den
HTML-Code aus dem Cache!?
Versuch mal das, bei mir funktioniert es:
Delphi-Quellcode:
var sL : TStringList;
begin
sL := TStringList.Create;
try
sL.Text := WebBrowser1.OleObject.Document.Body.InnerHtml;
sL.SaveToFile('c:\temp\test.html');
finally
sL.Free;
end;