Sintaxe
procedure ExportDBGrid;
procedure ExportDBGrid(Newsheet: Boolean);
procedure ExportDBGrid(Newsheet: Boolean; Row, Col: Integer);
| Newsheet |
Optional Boolean. True - exporta o dbgrid para uma nova Worksheet; False - exporta o dbgrid para uma Worksheet existente. O valor predefinido é True |
| Row |
Optional Inteiro. linha index |
| Col |
Optional Inteiro. coluna index |
Exemplo
Este exemplo cria o Livro Example1.xls com duas Folhas de Cálculo que contêm dados de DBGrid1 e DBGrid2
begin
GridToXLS1.Workbook := nil; //Clears livro
//First dbgrid
GridToXLS1.WorksheetName := 'DBGrid1 sheet'; //Especifica o nome da primeira folha de cálculo
GridToXLS1.DBGrid := DBGrid1; //Especifica o DBGrid para exportação
GridToXLS1.ExportDBGrid;
//Second dbgrid
GridToXLS1.WorksheetName := 'DBGrid2 sheet'; //Especifica o nome da segunda folha de cálculo
GridToXLS1.DBGrid := DBGrid2; //Especifica o DBGrid para exportação
GridToXLS1.ExportDBGrid;
GridToXLS1.SaveAs('Example1.xls'); //Saves the created livro into Example1.xls ficheiro
end;
Este exemplo cria o Livro Example2.xls com uma Folha de Cálculo que contém dados de DBGrid1 e DBGrid2