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

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

Не могу запустить Excel [D6, Win2k]


PShadow ©   (2002-05-14 15:51:00) 

День добрый.

Хочу чтоб с моей проги запускали Excel.
Нашел несколько вариантов ео запуска.
1-ый
Excel:=UnAssigned;
Excel:=CreateOleObject("Excel.Application");
В этом случае Дельфи говорит о неопределенном Идентификаторе CreateOleObject;

2-ой
NewInstance := true;
Excel := TExcelApplication.Create(Self);
if NewInstance then
Excel.ConnectKind := ckNewInstance
else
Excel.ConnectKind := ckRunningOrNew;
Excel.Connect;

В этом случае я не вижу Excel и не могу к нему обратиться, однако в списке задач Винды я его вижу. Как не пытался, не могу его отобразить.

Помогите плз..


Кулюкин Олег   (2002-05-14 16:47:00) [1]

2 PShadow (14.05.02 15:51)
Функция CreateOLEObject определена в юните ComObj.
Вы добавили его в раздел uses?


AFROLOV   (2002-05-14 16:31:00) [2]

Естественно это работает если на машине установлен Office.

Пример рабочего кода.

var
XL:Variant;
begin
XL:=CreateOLEObject("Excel.Application");
XL.WorkBooks.add;
XL.visible:=true;
XL.ActiveSheet.Hyperlinks.Add(XL.ActiveSheet.Cells[1,1]," http://www.yandex.ru","yandex","yandex");
end;
Excel:=UnAssigned;
end;
Если не заработает - пиши на мыло. Вышлю полный проект с этим примером.


Song   (2002-05-14 15:57:00) [3]

Excel:=CreateOleObject("Excel.Application");
try
// ...
finally
Excel:=UnAssigned;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо