Docs HotXLS
Accueil Sommaire Aperçu

ExportDBGrid-method

Exports the dbgrid to new or existing Worksheet

Syntaxe

procedure ExportDBGrid;
procedure ExportDBGrid(Newsheet: Boolean);
procedure ExportDBGrid(Newsheet: Boolean; Row, Col: Integer);
Newsheet Boolean Facultatif. True - exporter la dbgrid vers une nouvelle feuille ; False - exporter la dbgrid vers la feuille existante. La valeur par défaut est True
Row Optional Integer. Row index
Col Optional Integer. Column index

Exemple

Cet exemple crée le classeur Example1.xls avec deux feuilles qui contiennent les données de DBGrid1 et 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;
Cet exemple crée le classeur Example2.xls avec une feuille qui contient les données de DBGrid1 et DBGrid2 

begin
  GridToXLS1.Workbook := nil; //Clears Workbook
  GridToXLS1.WorksheetName := 'DBGrid1 and DBGrid2 sheet'; //Specifies the name for Worksheet

  //First dbgrid
  GridToXLS1.DBGrid := DBGrid1; //Specifies the dbgrid for export
  GridToXLS1.ExportDBGrid;

  //Second dbgrid
  GridToXLS1.DBGrid := DBGrid2; //Specifies the dbgrid for export
  GridToXLS1.ExportDBGrid(false);

  GridToXLS1.SaveAs('Example2.xls'); //Saves the created Workbook into Example2.xls file
end;