מתודה SaveAs

תחביר

דוגמה

begin
  DataToXLS1.Workbook := nil; //Clears חוברת עבודה

  //First dataset
  DataToXLS1.WorksheetName := 'Table1 sheet'; //מציין את שם גליון העבודה הראשון
  DataToXLS1.Dataset := Table1; //מציין את ערכת הנתונים לייצוא
  DataToXLS1.ExportDataset;

  //Second dataset
  DataToXLS1.WorksheetName := 'Table2 sheet'; //מציין את שם גליון העבודה השני
  DataToXLS1.Dataset := Table2; //מציין את ערכת הנתונים לייצוא
  DataToXLS1.ExportDataset;

  DataToXLS1.SaveAs('Example1.xls'); //Saves the created חוברת עבודה into Example1.xls קובץ
  DataToXLS1.SaveAs('Example1.xlsx'); //Saves the created חוברת עבודה into Example1.xlsx קובץ
  DataToXLS1.SaveAs('Example1.html'); //Saves the created חוברת עבודה into Example1.html קובץ
  DataToXLS1.SaveAs('Example1.rtf'); //Saves the created חוברת עבודה into Example1.rtf קובץ
end;