Форум: "Базы";
Текущий архив: 2002.12.30;
Скачать: [xml.tar.bz2];
ВнизПередача в Excel Найти похожие ветки
← →
Ежик (2002-12-09 12:43) [0]Подскажите, как передать данные из Grid в Excel, для последующей работы в Excele
← →
alxx (2002-12-09 12:45) [1]
Procedure ExportToExcel(Grid:TDBGrid);
var
WorkBook, Cell: Variant;
s:string;
ds:TDataSet;
i,j:Integer;
dese:Char;
Begin
Excel:=CreateOleObject("Excel.Application");
Excel.Visible:=True;
Excel.DisplayAlerts:=false;
Excel.WorkBooks.Add;
Excel.SheetsInNewWorkbook := 1;
WorkBook := Excel.WorkBooks.Add;
Sheet := WorkBook.WorkSheets[1];
Sheet.Cells.VerticalAlignment := $FFFFEFF4;// xlCenter
Sheet.Name:="
← →
Ежик (2002-12-09 12:48) [2]
> alxx © (09.12.02 12:45)
Cпасибо!
← →
Diouzshev (2002-12-09 20:10) [3]Медленно это!
посмотри на http://www.maxcomponents.net/
или грид ( http://devexpress.com) который сам умеет в эксель экспортировать.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.12.30;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.009 c