Dokumentace HotXLS
Domů Obsah Přehled

Metoda ExportDBGrid

Exportuje dbgrid do nového nebo existujícího listu

Syntaxe

procedure ExportDBGrid;
procedure ExportDBGrid(Newsheet: Boolean);
procedure ExportDBGrid(Newsheet: Boolean; Row, Col: Integer);
Newsheet Volitelný Boolean. True - exportuje dbgrid na nový Worksheet; False - exportuje dbgrid na existující Worksheet. Výchozí hodnota je True
Row Optional Integer. řádek index
Col Optional Integer. sloupec index

Příklad

Tento příklad vytvoří sešit Example1.xls se dvěma listy, které obsahují data z DBGrid1 a DBGrid2 

begin
  GridToXLS1.Workbook := nil; //Clears sešit

  //First dbgrid
  GridToXLS1.WorksheetName := 'DBGrid1 sheet'; //Určuje název prvního listu
  GridToXLS1.DBGrid := DBGrid1; //Určuje DBGrid pro export
  GridToXLS1.ExportDBGrid;

  //Second dbgrid
  GridToXLS1.WorksheetName := 'DBGrid2 sheet'; //Určuje název druhého listu
  GridToXLS1.DBGrid := DBGrid2; //Určuje DBGrid pro export
  GridToXLS1.ExportDBGrid;

  GridToXLS1.SaveAs('Example1.xls'); //Saves the created sešit into Example1.xls soubor
end;
Tento příklad vytvoří sešit Example2.xls s jedním listem, který obsahuje data z DBGrid1 a DBGrid2 

begin
  GridToXLS1.Workbook := nil; //Clears sešit
  GridToXLS1.WorksheetName := 'DBGrid1 and DBGrid2 sheet'; //Určuje název listu

  //First dbgrid
  GridToXLS1.DBGrid := DBGrid1; //Určuje DBGrid pro export
  GridToXLS1.ExportDBGrid;

  //Second dbgrid
  GridToXLS1.DBGrid := DBGrid2; //Určuje DBGrid pro export
  GridToXLS1.ExportDBGrid(false);

  GridToXLS1.SaveAs('Example2.xls'); //Saves the created sešit into Example2.xls soubor
end;