Ich möchte die Formatierungen aus einer RichEdit-Komponente oder einer Listbox bei der Ausgabe in MS WORD übernehmen.
Mit nachstehendem Code gelingt mir das nicht. Wo kann ich hilfreiche Dokumentation finden ?
Procedure WORD_OEFFNEN;
..
MSWord := CreateOleObject('Word.Basic');
Lang := MSWord.AppInfo(Integer(16));
end;
Procedure AUSGABE_IN_WORD;
WORD_OEFFNEN;
for i := 0 to M.RichEdit1.Lines.Count - 1 do
MSWORD.Insert( M.RichEdit1.Lines[i] + Chr(13));
end;
Am einfachsten würde das über die Zwischenablage gehen:
Delphi-Quellcode:
richedit1.SelectAll;
richedit1.CopyToClipboard;
... paste into Word
Du solltest aber wirklich nicht mehr "word.basic" verwenden, das ist seit Jahrzehnten ausgemustert und die Kompatibilität mit neueren Word-Versionen ist nicht garantiert. Verwende "Word.Document".