Скачать: CL | DM;

Как вставить текст из txt в Word?   Найти похожие ветки 

← →
Имран   (2003-04-10 10:31) [0]

Народ, помогите начинающему... Нужно создать Word-овский документ по своему шаблону, загрузить в него текст из txt файла на диске и сохранить как Word-документ. При этом хотелось бы чтобы это все произошло вообще без открытия Word-а на экране. Спасибо!

---

← →
Ozone ©   (2003-04-10 11:25) [1]

var
Wa, Wd: Variant;
f: textfile;
s: string;
begin
Wa:=CreateOleObject("Word.Application");
Wd:=Wa.Documents.Open("Шаблон.doc");
AssignFile(f,"Text.txt");
Reset(f);
while not Eof(f) do begin
readln(s);
Wd.Range.InsertAfter(s+#13#10); {по-моему так}
end;
closefile(f);
Wd.SaveAs("");
Wd.Close;
Wa.Quit;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.012 c