Aktuelle Seite vom TWebbrowser sichern...

[Ricane]

Oder:

Delphi-Quellcode:

Var

  HTMLDocument: IHTMLDocument2;
  PersistFile: IPersistFile;

Begin

  HTMLDocument := wbParsen.Document As IHTMLDocument2;
  PersistFile := HTMLDocument As IPersistFile;
  PersistFile.Save(StringToOleStr('c:\SavedFile.html'), System.True);

End;

Delphi-Quellcode:

Uses:
ActiveX, MSHTML, OleCtrls, StdCtrls

Getestet und für gut befunden



Ricane