Exportiert das
DBGrid in ein neues oder vorhandenes Tabellenblatt
Syntax
procedure ExportDBGrid;
procedure ExportDBGrid(Newsheet: Boolean);
procedure ExportDBGrid(Newsheet: Boolean; Row, Col: Integer);
| Newsheet |
Optionales Boolean. True - exportiert das DBGrid in ein neues Worksheet; False - exportiert das DBGrid in ein vorhandenes Worksheet. Standardwert ist True |
| Row |
Optional Integer. Zeile Index |
| Col |
Optional Integer. Spalte Index |
Beispiel
Dieses Beispiel erstellt die Arbeitsmappe Example1.xls mit zwei Tabellenblättern, die Daten aus DBGrid1 und DBGrid2 enthalten
begin
GridToXLS1.Workbook := nil; //Clears Workbook
//First dbgrid
GridToXLS1.WorksheetName := 'DBGrid1 sheet'; //Specifies the name for first Worksheet
GridToXLS1.DBGrid := DBGrid1; //Specifies the dbgrid for export
GridToXLS1.ExportDBGrid;
//Second dbgrid
GridToXLS1.WorksheetName := 'DBGrid2 sheet'; //Specifies the name for second Worksheet
GridToXLS1.DBGrid := DBGrid2; //Specifies the dbgrid for export
GridToXLS1.ExportDBGrid;
GridToXLS1.SaveAs('Example1.xls'); //Saves the created Workbook into Example1.xls file
end;
Dieses Beispiel erstellt die Arbeitsmappe Example2.xls mit einem Tabellenblatt, das Daten aus DBGrid1 und DBGrid2 enthält