Exportuje
dbgrid do nového alebo existujúceho pracovného listu
Syntax
procedure ExportDBGrid;
procedure ExportDBGrid(Newsheet: Boolean);
procedure ExportDBGrid(Newsheet: Boolean; Row, Col: Integer);
| Newsheet |
Voliteľný Boolean. True - exportuje dbgrid do nového pracovného hárka; False - exportuje dbgrid do existujúceho pracovného hárka. Predvolená hodnota je True |
| Row |
Optional Integer. riadok index |
| Col |
Optional Integer. stĺpec index |
Príklad
This example creates Example1.xls Workbook with two Worksheets which contain data from DBGrid1 and DBGrid2
begin
GridToXLS1.Workbook := nil; //Clears zošit
//First dbgrid
GridToXLS1.WorksheetName := 'DBGrid1 sheet'; //Určuje názov prvého hárka
GridToXLS1.DBGrid := DBGrid1; //Určuje DBGrid na export
GridToXLS1.ExportDBGrid;
//Second dbgrid
GridToXLS1.WorksheetName := 'DBGrid2 sheet'; //Určuje názov druhého hárka
GridToXLS1.DBGrid := DBGrid2; //Určuje DBGrid na export
GridToXLS1.ExportDBGrid;
GridToXLS1.SaveAs('Example1.xls'); //Saves the created zošit into Example1.xls súbor
end;
This example creates Example2.xls Workbook with one Worksheet which contain data from DBGrid1 and DBGrid2