| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

TWordApplication - Поможите!!! [D5]

Gnom ©   (2002-05-07 10:45:00) 

Помогите! Надо программно вордом загрузить файл в одном формате (rtf) и сохранить в другом (html). Проблема с параметрами, которыенадо указывать.
Загрузить могу -
var aa,name,c,z:olevariant;
begin
name:="e:\q.rtf";
c:=Emptyparam;
z:="rtf";
wordapplication1.Documents.Open (name,c,c,c,c,c,c,c,c,z);

А сохранить никак. Причем никак даже в том же формате если через Saveas -
c:=Emptyparam;
name:="e:\q1.rtf";
z:="rtf";
wordapplication1.activedocument.SaveAs(name,z,c,c,c,c,c,c,c,c,c);

дает ошибку "Несовпадение типов" :-(((((

---

Gnom   (2002-05-07 11:37:00) [1]

Спасибо!!!! То что нужно!
Кстати, (это я как бабка из золотой рыбки :-) ) может кто знает - для полного счастья нужно сохранять из RichEdit в формат html. А для этого единственное что мне нужно - это знать как можно (если ваще можно) при сохранении его резуьлтатов в rtf сделать так чтоб русские буквы представлялись русскими буквами а не 4-байтовой последовательностью для каждой буквы. Я уже спрашивал, но может как паз тот кто знает не видел этого вопроса...
Если никак то через word и потом уже преобразовывать то что он там насохраняет

---

Дмитрий Баранов   (2002-05-07 10:52:00) [2]

const wdFormatDocument = 0;
wdFormatDOSText = 4;
wdFormatDOSTextLineBreaks = 3;
wdFormatEncodedText = 7;
wdFormatHTML = 8;
wdFormatRTF = 6;
wdFormatTemplate = 1;
wdFormatText = 2;
wdFormatTextLineBreaks = 3;
wdFormatUnicodeText = 7;
...
Doc.ActiveDocument.SaveAs(FileName:="a.htm", FileFormat:=8);
...
{ надо бы в FAQ вынести, что ли? }

---

Наверх