Вниз
Скачать: CL | DM;

передача из базы в Excel   Найти похожие ветки 

 
чайник   (2003-12-03 11:26) [0]

Уважаемые мастера, что тут неправильно:
на форме 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.
Спасибо.


 
AbrosimovA ©   (2003-12-03 11:57) [1]

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


 
nstur   (2003-12-03 12:01) [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


 
Kadr ©   (2003-12-03 12:30) [3]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
3-86321
Russko
2003-12-01 13:41
2003.12.26
Table is busy


14-86504
chs2r
2003-12-04 15:47
2003.12.26
Восстановление удаленных файлов


1-86334
Mishenka
2003-12-12 21:43
2003.12.26
Как обнулить содержимое StringGrid?


3-86292
dj-amigo
2003-11-28 19:48
2003.12.26
Сортировка по вычислимому полю в наборе данных TTable


4-86595
lmatveev
2003-11-01 03:14
2003.12.26
Как передать текст в другое приложение




   Наверх