powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Delphi + Excel = не получается...
5 сообщений из 5, страница 1 из 1
Delphi + Excel = не получается...
    #32221997
G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
G
Гость
При компиляции уже на строчке
Excel := CreateOleObject( 'Excel.Application');
выскакивает сообщение "Undeclared identifier CreateOleObject"
из-за чего это происходит????
...
Рейтинг: 0 / 0
Delphi + Excel = не получается...
    #32222006
alex_k
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
comobj в uses добаь.
если тебе это о чем-то говорит.
...
Рейтинг: 0 / 0
Delphi + Excel = не получается...
    #32222032
G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
G
Гость
to alex_k
Спасибо...
прога стала запускаться,
но теперь ругается на следующую строку
WorkBook:=Excel.WorkBook.Add('test.xls');
выдает сообщение "Method WorkBook not supported by automation object"
Почему так?
...
Рейтинг: 0 / 0
Delphi + Excel = не получается...
    #32222034
G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
G
Гость
Извинити, самразобрался, опечатка...
похоже утрое тяжелое :-)
...
Рейтинг: 0 / 0
Delphi + Excel = не получается...
    #32222038
alex_k
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
у меня так делается:
Код: plaintext
1.
2.
     ex:=createoleobject('excel.application');
     ex.workbooks.open(fn);

Это если ты хочешь открыть существующий, а если новый то так:
Код: plaintext
1.
2.
3.
     ex:=createoleobject('excel.application');
     Ex.SheetsInNewWorkbook:= 1 ;
     exw := ex.Workbooks.Add;
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Delphi + Excel = не получается...
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]