Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.30;
Скачать: CL | DM;

Вниз

Перенос данных из Adotable в Эксель   Найти похожие ветки 

 
Crazy monkey   (2006-07-11 14:21) [0]

Сейчас переношу следующим образом:
ExcelApp := CreateOleObject ("Excel.Application");
ExcelApp.Application.EnableEvents := false;
ExcelApp.WorkBooks.Add;
ExcelApp.ActiveWorkBook.WorkSheets[1].Cells[1,1] := "Заголовок 1";
while  not adotable1.Eof do begin
ExcelApp.ActiveWorkBook.WorkSheets[1].Cells[I,1] :=s;
и.т.д

Может есть более эффективный способ? Может компонент, который автоматически перенесет данные из Dbgrid или Adotabke? Т.е перенесет заголовки и данные причем пропорционально тому как данные отображены в таблице. Т.е к примеру у меня поле примечание самое большое. Соответственно и при переносе необходимо чтобы это поле в Экселе было соответсвующим.

Заранее спасибо!


 
Crazy monkey   (2006-07-11 17:54) [1]

Эээ.. нет совсем версий? Может все таки есть болле эффективный способы?


 
YurikGL ©   (2006-07-11 21:22) [2]

http://www.delphikingdom.com/asp/viewitem.asp?catalogid=249&mode=print

Работаем через вариантные массивы



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

Текущий архив: 2006.07.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.029 c
2-1152688859
kyn66
2006-07-12 11:20
2006.07.30
Свой WinMessenger


15-1151501203
Гарри Поттер
2006-06-28 17:26
2006.07.30
Вирус разводит на деньги.


1-1150560642
Avgust
2006-06-17 20:10
2006.07.30
таймер в сервисе или как его включить-выключить???


2-1151914701
D@Nger
2006-07-03 12:18
2006.07.30
Координаты ячейки DBGrida a


2-1152607440
zdm
2006-07-11 12:44
2006.07.30
dbTreeView