Текущий архив: 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.038 c
