MS OFFICE2000 & DELPHI

← →
Ulikoff (2002-10-21 17:13) [0]

Уважаемые мастера!
Помогите с такой проблемой. Есть программа, написанная на D3, при помощи которой из БД данные выводятся в Word"97(заполняется шаблон).
При установке Word"2000 данные не выводся в Word, а программа сообщает, что Word на компьютере не найден.
Подскажите, что делать (поможет ли преход на др. версию Delphi или еще что-то)?
Проблема очень актуальна, особенно в свете всеобщего лицензирования. MS Office"97 лицензионный я уже не достану.

Огромное спасибо.

← →
DieHard (2002-10-21 17:31) [1]

как в программе организуется коннект к Ворду?

← →
Ulikoff (2002-10-21 18:57) [2]

Спасибо за отклик.
Коннект в Word происходит
MsWord := CreateOleObject("Word.Basic");

← →
Рыжик (2002-10-22 11:12) [3]

Надо заменить в uses Word97 на Word2000. Правда в D3 кажется его нет. Поэтому делаем следующее:
1.Выбираем Project|Import Type Library.
2.Жмем кнопочку Add, находим Word9.olb (или чего-то в этом духе)
3.Жмём кнопочку Create Unit. Будет создан Word9_TLB.
4.Заменяем старый файл в uses на новый.
Вроде должно помочь.

← →
asmith (2002-10-23 17:39) [4]

А можно так:
============
const
OleClassName = "word.application.8"; // для Office2000
// OleClassName = "word.application.9"; // для Office2002(XP)
var
bSucces : boolean;
...
try
bSucces := False;
try
oWordApplication := GetActiveOleObject(OleClassName);
bSucces := True;
except
end;
if not bSucces then
try
oWordApplication := CreateOleObject(OleClassName);
bSucces := True;
except
raise;
end;

MS OFFICE2000 & DELPHI Найти похожие ветки