Hallo,
ich lade ein Dokument aus dem Internet herunter, veränder es und möchte es zum schluss auf der Festplatte speichern (alles ohne TWebBrowser).
Delphi-Quelltext
1: 2: 3: 4:
| Element1:= FDocument.createElement('div'); Element1.innerHTML:= AText;
(FDocument.Body as IHTMLDOMNode).appendChild(Element1 as IHTMLDOMNode); |
Bisher habe ich das Speichern so probiert:
Delphi-Quelltext
1: 2: 3: 4: 5: 6:
| procedure SaveToFile(const ADoc: IHTMLDocument2; const AFileName: String); var PersistFile: IPersistFile; begin PersistFile:= ADoc as IPersistFile; PersistFile.Save(StringToOleStr(AFileName), System.True); end; |
Nur leider sieht das File dann genau so aus, wie ich es heruntergeladen habe. Also meine Änderungen wurden nicht übernommen
Weiß jemand, wie ich es schaffe, die Änderungen zu speichern?
Der Body ist genau so, wie ich es will (
showmessage(FDocument.Body))
Viele Grüße
Littleben