وثائق HotXLS

طريقة SaveAs

يحفظ التغييرات على المصنف في ملف أو دفق مختلف. يرجع 1 إذا نجح

بناء الجملة

function SaveAs(FileName: WideString): Integer;
function SaveAs(FileName: WideString; FileFormat: TXLSFileFormat): Integer;
function SaveAs(Stream: TStream);
function SaveAs(Stream: TStream; FileFormat: TXLSFileFormat): Integer;
FileName WideString. سلسلة تشير إلى اسم الملف المراد حفظه. يمكنك تضمين مسار كامل؛ إذا لم تفعل ذلك، يحفظ المصنف الملف في المجلد الحالي
FileFormat TXLSFileFormat اختياري. قيمة تشير إلى تنسيق الملف المراد حفظه. الافتراضي هو xlExcel97
Stream TStream. يحفظ المصنف في دفق محدد في معلمة Stream

الوصف

يُكمل إخراج ملف XLS التسلسل في ملف تجهيز شقيق قبل استبدال الوجهة؛ ويترك الالتزام الفاشل الوجهة القائمة سليمة ويبلّغ عن الخطأ الأصلي الملتقط عبر تشخيصات المصنف

على أنظمة ملفات Windows الداعمة لإعادة التسمية POSIX، قد ينجح الاستبدال بينما يبقى مقبض metadata أو قارئ يسمح بالحذف مفتوحًا؛ ويواصل القارئ القائم رؤية كائن الملف الأصلي، بينما يرى القارئ الجديد لاسم الوجهة الاستبدال المكتمل

يجب أن تسمح الوجهة بحق الحذف ومشاركة الحذف، ولا تزال الأهداف للقراءة فقط تُرفض؛ ولا يُعاد محاولة الالتزام الفاشل، بينما تستخدم الأهداف المفقودة ومسارات reparse وأنظمة الملفات غير المدعومة مسار الالتزام القديم المختار قبل الاستبدال

يحمي الاستبدال الذري نشر ملف واحد مكتمل؛ ولا يوفر عزل مقارنة-و-استبدال مقابل عملية أخرى تستبدل الاسم نفسه تزامنيًا

يمكن أن يكون FileFormat واحدا من ثوابت TXLSFileFormat هذه
xlExcel97 تنسيق ملف MS Excel 97,2000,XP,2003
xlExcel5 تنسيق ملف MS Excel 5,95
xlHTML تنسيق ملف HTML
xlRTF تنسيق النص الغني (RTF)
xlCSV تنسيق ملف قيم مفصولة بفاصلة (CSV)
xlText تنسيق ملف قيم مفصولة بعلامة جدولة (TSV)
xlUnicodeCSV تنسيق ملف قيم يونيكود مفصولة بفاصلة (CSV)
xlUnicodeText تنسيق ملف قيم يونيكود مفصولة بعلامة جدولة (TSV)

مثال

ينشئ هذا المثال مصنفا جديدا بورقة عمل واحدة ثم يحفظ المصنف

Var
  Workbook: IXLSWorkbook;
begin
  Workbook := TXLSWorkbook.Create; {create new Workbook}
  Workbook.Worksheets.Add;
  {...}
  //Save Workbook as Excel 97 file format 
  Workbook.SaveAs('C:\book.xls');
  //Save Workbook as Excel 5-95 file format 
  Workbook.SaveAs('C:\book5.xls', xlExcel5);
  //Save Workbook as HTML 
  Workbook.SaveAs('C:\book.html', xlHTML);
  //Save Workbook as RTF file 
  Workbook.SaveAs('C:\book.rtf', xlRTF);
  //Save active Worksheet as comma separated values (CSV)
  Workbook.SaveAs('C:\book.csv', xlCSV);
  //Save active Worksheet as tab separated values (TSV)
  Workbook.SaveAs('C:\book.tsv', xlText);
  //Save active Worksheet as comma separated unicode values (CSV)
  Workbook.SaveAs('C:\book.csv', xlUnicodeCSV);
  //Save active Worksheet as tab separated unicode values (TSV)
  Workbook.SaveAs('C:\book.tsv', xlUnicodeText);
end;
يحفظ هذا المثال المصنف في حقل BLOB

var
  MS: TMemoryStream;
begin
  if not (ClientDataSet1.State in [dsInsert, dsEdit]) then
    ClientDataSet1.Insert;
  MS := TMemoryStream.Create();
  try
    FWorkbook.SaveAs(MS);
    ClientDataSet1Documents.LoadFromStream(MS);
  finally
    MS.Free;
  end;
  ClientDataSet1.Post;
end;