Почему может не работать Office 2003 Через OLE

← →
Inna_Z (2007-03-26 17:07) [0]

Простенькая программка.
Не хочет работать с 2003-им офисом, но прекрасно выполняется на 2000-ом.

Что такого нового появилось в новом офисе и как его правильно настроить или установить чтоб это заработало?

При запуске программы выскакивает окошко о том что приложение ексель вызвало ошибку и будет закрыто...

var App: OleVariant; begin try App := GetActiveOleObject("Excel.Application"); except try App := CreateOleObject("Excel.Application"); except ShowMessage("Cannot start!"); Exit; end; end; App.Visible := True; App.Workbooks.Add[XLWBatWorksheet]; App.Workbooks[1].Worksheets[1].Name := "Delphi Data"; end;

← →
umbra © (2007-03-26 17:45) [1]

> о том что приложение ексель вызвало ошибку и будет закрыто.
> ..

на какой строчке?

> App.Workbooks.Add[XLWBatWorksheet];

это неправильно. Add - метод, поэтому скобки должны быть круглые

← →
Inna_Z (2007-03-26 17:51) [2]

Оно сваливается ещё во время
App := CreateOleObject("Excel.Application");

этот код в принципе вообще можно убрать

App.Visible := True; App.Workbooks.Add[XLWBatWorksheet]; App.Workbooks[1].Worksheets[1].Name := "Delphi Data";

И весь тот код спокойно работает на 2000-ом офисе

Дело даже не в екселе. Ни одно офисное приложение не удаётся подключить через ОЛЕ.

Только не предлагайте ещё несколько раз переустановить офис.
Может есть какие-то особенности по его установке, чтоб это работало?

← →
umbra © (2007-03-26 18:58) [3]

> предлагайте ещё несколько раз переустановить офис

а дело идет к тому :). А если написать
App := CreateOleObject("Excel.Application.11");
ошибка остается?

← →
Inna_Z (2007-03-26 19:20) [4]

Да остаётся.

И даже пробовала на 2005 студии а не на делфи сделать подобное
после подключения там екселя оно его просто не видело.

Вот пробую переустановить ещё раз офис уже полностью почистив всё.
Посмотрим что получится.
Мне кажется проблема может быть только в этом.

Но ключи в реестре все на месте. И пути правильные. И притом я изначально хочела подключить так MSProject (котрый переж этим только только установила), а только потом обнаружила что так не только он не работатет, но и все продукты офиса.

Другие программы не офисовские робовала подключать, то было без проблем.

похоже на то, что осталось что-то от 2000-го оффиса. Я в подобных случаях сношу все оффисы, чищу руками все файлы (файлы могут быть в папках Program Files\Microsoft office, Program Files\Common files\Microsoft Shared\office, Documents and Settings\<username>\Application Data\office), на всякий случай перезагружаю машину, делаю проверку реестра на предмет ключей, ссылающихся в никуда и только потом устанавливаю нужный оффис

← →
Inna_Z (2007-03-27 12:47) [6]

Суть глюка оказалась в том что доустанавливала проджект я тогда с другого пакета офиса, с другим серийным номером...

Обнаружилось случайно :-)
После того как всё удалила поставила офис - программа заработала без проблем. А после того как установила MSProject - то снова появилась ошибка.

Эх.

Почему может не работать Office 2003 Через OLE Найти похожие ветки