![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Не могу запустить 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;