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

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

передача из базы в Excel [D7, MSSQL]


чайник ©   (2003-12-03 11:26:00) 

Уважаемые мастера, что тут неправильно:
на форме 2 компонента с вкладки Servers TExcelApplication и TExcelWoorkBook.
код следующий:

procedure Tvvod.bbpechClick(Sender: TObject);
var n:OleVariant;

begin
n:="d:\1.xls";
EA1.Workbooks.add(n,0);
EWb1.ConnectTo(EA1.ActiveWorkbook);
EA1.Cells.Item[1,1].Value:="Для печати";
end;
выдает сообщение что невозможно загрузить Excel, стоит у меня WindowsXP и OfficeXp.
Спасибо.


Kadr   (2003-12-03 12:30:00) [1]

В Excel Данные->Импорт внешних данных->Создать запрос


nstur   (2003-12-03 12:01:00) [2]

У меня примерно так:
function TNsExcel2000.NewWorkbook(Template: String = ""): boolean;
var
DocTemplate: OleVariant;
begin
Result:= False;
try
CoInitialize(Nil);
Connect;
DocTemplate := Template;
if Template = "" then
OleVariant(Workbooks).Add
else
OleVariant(Workbooks).Add(DocTemplate);
OleVariant(Application).Visible:= WordBool(True);
except
//тындар-лындар
end;
end;
Более полно в http://www.nstur.narod.ru/Delphi/index.html


AbrosimovA   (2003-12-03 11:57:00) [3]

Определись сначала в какой строке кода возникает ошибка.


Наверх

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