SaveAs 方法
将区域值保存到文件或流中。成功则返回 1
语法
function SaveAs(FileName: WideString; FileFormat: TXLSFileFormat): Integer;
function SaveAs(Stream: TStream; FileFormat: TXLSFileFormat): Integer;
| FileName |
WideString。指示要保存的文件名的字符串。可以包含完整路径；如果不包含，组件会将文件保存在当前文件夹中 |
| FileFormat |
TXLSFileFormat。指示要保存的文件格式的值 |
| Stream |
TStream。保存到 Stream 参数中指定的流 |
说明
FileFormat 可以为以下 TXLSFileFormat 常量之一
| xlHTML |
HTML 文件格式 |
| xlCSV |
逗号分隔值文件格式（CSV） |
| xlText |
制表符分隔值文件格式（TSV） |
| xlUnicodeCSV |
逗号分隔 Unicode 值文件格式（CSV） |
| xlUnicodeText |
制表符分隔 Unicode 值文件格式（TSV） |
示例
此示例将工作表一上的单元格 A1:F100 保存为 CSV 文件
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.csv', xlCSV);
此示例将工作表一上的单元格 A1:F100 保存为 HTML 文件
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.html', xlHTML);
此示例将工作表一上的单元格 A1:F100 保存为 TSV（制表符分隔值）文件
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlText);
此示例将整个工作表保存为 sheet.csv
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlCSV);
此示例将整个工作表保存为 Unicode sheet.csv
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlUnicode CSV);
此示例将工作表一上的单元格 A1:F100 保存为 Unicode TSV（制表符分隔值）文件
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlUnicodeText);