Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.16;
Скачать: CL | DM;

Вниз

COM и MS Word XP   Найти похожие ветки 

 
Nikolai_S ©   (2003-10-06 12:59) [0]

В Дельфи 6 с помощью компонентов TWordApplication, TWordDocument создаю отчеты в MS Word. Подставляю в заранее заготовленный документ информацию в различные поля из программы (с помощью замены). Например, в документе-шаблоне есть поле [FirmName], которое заменяется на какую-то строку из программы.

Проблема в том, что с Word 97, 2000 все работает, а в XP функция replace просто не срабатывает:


uses word2000;

procedure WordReplace(var WordDocument: TWordDocument; FindStr, ReplaceStr: string);
var
oldP, newP, Replace, MatchWholeWord: OleVariant;
begin
oldP := FindStr;
newP := ReplaceStr;
Replace := wdReplaceAll;
MatchWholeWord:= True;
WordDocument.Range.Find.Execute(oldP, EmptyParam, MatchWholeWord,
EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
EmptyParam, newP, Replace);
end;


В дельфи 7 при использовании юнитов Word97, Word2000 или WordXP вообще вылетают какие-то ужасные ошибки.


 
Nikolai_S ©   (2003-10-07 10:16) [1]

?



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

Текущий архив: 2003.10.16;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.015 c
1-51210
Nirod
2003-10-04 11:43
2003.10.16
Вопросик


3-51108
diokant
2003-09-24 13:27
2003.10.16
Как обеспечить отображение значения поля, измененного триггером


1-51223
ligor
2003-10-03 17:54
2003.10.16
dll


14-51464
Dimaz-z
2003-09-29 15:49
2003.10.16
Юзвери...


14-51471
Layner
2003-09-29 13:41
2003.10.16
Помогите скинуть видеопоток на диск с первоначальным сжатием