HotXLS-dokumentation
Startsida Innehåll Översikt

SaveAs metod

Saves changes to the Workbook in a different file or stream. Returnerar 1 if it succeeds

Syntax

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. En sträng som anger namnet på filen som ska sparas. Du kan ange en fullständig sökväg; gör du inte det sparar Workbook filen i aktuell mapp
FileFormat Valfri TXLSFileFormat. Ett värde som anger formatet på filen som ska sparas. Standard är xlExcel97
Stream TStream. Saves Workbook to a stream specified in the Stream parameter

Beskrivning

XLS-filutdata färdigställer serialiseringen i en mellanlagrande syskonfil innan destinationen ersätts; ett misslyckat genomförande lämnar den befintliga destinationen intakt och rapporterar det fångade inbyggda felet via arbetsboksdiagnostiken

På Windowssfilsystem med stöd för POSIX rename kan ersättningen lyckas medan ett metadata- eller läsarhandtag som tillåter borttagning fortfarande är öppet; en befintlig läsare fortsätter se det ursprungliga filobjektet, och en ny läsare av destinationen ser de nya bytena

Destinationen måste tillåta borttagningsåtkomst och borttagningsdelning, och skrivskyddade mål avvisas fortfarande; ett misslyckat genomförande görs inte om, medan saknade mål, omanalystvägar och ostödda filsystem använder den äldre genomförandevägen som väljs före replace-anropet

Atomär ersättning skyddar publiceringen av en färdigställd fil; den ger inte isolering av typen compare-and-swap mot en annan process som samtidigt ersätter samma namn

FileFormat can be one of these TXLSFileFormat constants
xlExcel97 MS Excel 97,2000,XP,2003 file format
xlExcel5 MS Excel 5,95 file format
xlHTML HTML file format
xlRTF Rich Text Format (RTF)
xlCSV Comma separated values file format (CSV)
xlText Tab separated values file format (TSV)
xlUnicodeCSV Comma separated unicode values file format (CSV)
xlUnicodeText Tab separated unicode values file format (TSV)

Exempel

Exemplet skapar en ny arbetsbok med ett kalkylblad och sparar sedan arbetsboken 

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;
This example saves Workbook into the BLOB field 

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;