طريقة SaveAs

البناء

مثال

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

  //First dataset
  DataToXLS1.WorksheetName := 'Table1 sheet'; //يحدد the name for first Worksheet
  DataToXLS1.Dataset := Table1; //يحدد the dataset for export
  DataToXLS1.ExportDataset;

  //Second dataset
  DataToXLS1.WorksheetName := 'Table2 sheet'; //يحدد the name for second Worksheet
  DataToXLS1.Dataset := Table2; //يحدد the dataset for export
  DataToXLS1.ExportDataset;

  DataToXLS1.SaveAs('Example1.xls'); //Saves the created Workbook into Example1.xls file
  DataToXLS1.SaveAs('Example1.xlsx'); //Saves the created Workbook into Example1.xlsx file
  DataToXLS1.SaveAs('Example1.html'); //Saves the created Workbook into Example1.html file
  DataToXLS1.SaveAs('Example1.rtf'); //Saves the created Workbook into Example1.rtf file
end;