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

экспорт в excel   Найти похожие ветки 

← →
rosl   (2003-05-11 10:21) [0]

Народ!!! Подскажите, где можно скачать статью или пример экспорта содержимого DBGrid в excel


← →
Alexandr ©   (2003-05-11 10:34) [1]

а где ты искал?


← →
Shirson ©   (2003-05-12 08:04) [2]

А не проще в самом XL, в Get External Data, прописать SQL запрос и получать его нажатием одной кнопки?


← →
Style ©   (2003-05-12 08:29) [3]

http://sands.nm.ru/NMKExcel.pas

попробуй через компонентик можеть подойдет..


← →
Hooch ©   (2003-05-12 08:55) [4]

во пример, TClientDataSet можно заменить на TDataSet
function TExcelTools.SetDataToSheet(DataSet: TClientDataSet; ARow, ACol: integer): boolean;
var
ColCount : integer;
RowCount : integer;
OutArray : variant;
i,j : integer;
begin
try
ColCount := DataSet.FieldDefs.Count-1;
RowCount := DataSet.RecordCount-1;
OutArray := VarArrayCreate([0, RowCount, 0, ColCount],varVariant);
DataSet.First;
i := 0;
while not DataSet.Eof do begin
for j:=0 to ColCount do begin
OutArray[i,j] := DataSet.Fields[j].Value;
end;
DataSet.Next;
Inc(i);
end;
ActiveSheet.Cells.NumberFormat :="@";
ActiveSheet.Range(ActiveSheet.Cells[ARow,ACol],ActiveSheet.Cells[ARow+RowCount,ACol+ColCount]) := OutArray;
Result := true;
except
Result := false;
end;
end;


← →
teapot ©   (2003-05-12 09:05) [5]

Высылаю по e-mail статейку, авось поможет.
Лично мне помогла.


← →
Соловьев ©   (2003-05-12 09:44) [6]

http://www.delphikingdom.com/helloworld/excelsm.htm



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

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



Память: 0.46 MB
Время: 0.016 c
3-94773
Sirus
2003-05-12 09:57
2003.05.29
Сдается мне что FireBird работает медленне чем Interbase...


3-94677
Viktor
2003-04-29 01:36
2003.05.29
Хранение рисунков в базе данных


1-94798
Kettle of delphi
2003-05-18 22:20
2003.05.29
Вопрос о компоненте Chart (графики, закладка Additional).


3-94762
Jaik
2003-05-11 11:42
2003.05.29
Сохранение отсортированной выборки


1-94855
Serguar
2003-05-20 10:01
2003.05.29
присвоение переменным значения Null




   Наверх