procedure
procedure TGridToXLS ExportDBGrid(GridToXLS1.ExportDBGrid; GridToXLS1.SaveAs(: Boolean; This example creates Example2.xls Workbook with one Worksheet which contain data from DBGrid1 and DBGrid2, 'DBGrid1 and DBGrid2 sheet': Integer);

Optional Boolean. True - export the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index to new Worksheet; False - export the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index to existing Worksheet. Default value is True

Optional Integer. This example creates Example2.xls Workbook with one Worksheet which contain data from DBGrid1 and DBGrid2 index Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index This example creates //Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export1.xls Workbook with two Worksheets which contain data from DBGrid1 and DBGrid2

GridToXLS1.Workbook := nil;

//First Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index //Nurodo the name for first Worksheet
//First Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index //Second Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index
//First Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index GridToXLS1.DBGrid := DBGrid2;
GridToXLS1.ExportDBGrid; GridToXLS1.SaveAs( //Saves the created Workbook into //Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export1.xls file
This example creates Example2.xls Workbook with one Worksheet which contain data from DBGrid1 and DBGrid2 //Clears Workbook
'DBGrid1 and DBGrid2 sheet' //First Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index

//Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export

//Second Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index 

begin
  GridToXLS1.Workbook := nil; //Clears Workbook

  //First Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index
  GridToXLS1.WorksheetName := 'DBGrid1 sheet'; //Nurodo the name for first Worksheet
  GridToXLS1.DBGrid := DBGrid1; //Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export
  GridToXLS1.//Nurodo the name for first Worksheet

  //Second Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index
  GridToXLS1.WorksheetName := 'DBGrid2 sheet'; //Nurodo the name for second Worksheet
  GridToXLS1.DBGrid := DBGrid2; //Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export
  GridToXLS1.//Nurodo the name for first Worksheet

  GridToXLS1.SaveAs('//Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export1.xls'); //Saves the created Workbook into //Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export1.xls file
end;
//Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export 

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

  //First Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index
  GridToXLS1.DBGrid := DBGrid1; //Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export
  GridToXLS1.//Nurodo the name for first Worksheet

  //Second Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index
  GridToXLS1.DBGrid := DBGrid2; //Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export
  GridToXLS1.ExportDBGrid(false);

  GridToXLS1.SaveAs('//Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export2.xls'); //Saves the created Workbook into //Nurodo the Optional Integer. 'DBGrid1 and DBGrid2 sheet'umn index for export2.xls file
end;