Exporta el
DBGrid a una hoja de trabajo nueva o existente
Sintaxis
procedure ExportDBGrid;
procedure ExportDBGrid(Newsheet: Boolean);
procedure ExportDBGrid(Newsheet: Boolean; Row, Col: Integer);
| Newsheet |
Optional Boolean. True - exportar el dbgrid a una nueva Worksheet; False - exportar el dbgrid a una Worksheet existente. El valor predeterminado es True |
| Row |
Optional Entero. fila índice |
| Col |
Optional Entero. columna índice |
Ejemplo
Este ejemplo crea el libro de trabajo Example1.xls con dos hojas de trabajo que contienen datos de DBGrid1 y DBGrid2
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;
Este ejemplo crea el libro de trabajo Example2.xls con una hoja de trabajo que contiene datos de DBGrid1 y DBGrid2