Metoda SaveAs
Zapisuje wartości zakresu do pliku lub strumienia. Zwraca 1 w przypadku sukcesu
Składnia
function SaveAs(FileName: WideString; FileFormat: TXLSFileFormat): Integer;
function SaveAs(Stream: TStream; FileFormat: TXLSFileFormat): Integer;
| FileName |
WideString. Łańcuch określający nazwę pliku do zapisania. Możesz podać pełną ścieżkę; jeśli tego nie zrobisz, komponent zapisze plik w bieżącym folderze |
| FileFormat |
TXLSFileFormat. Wartość określająca format pliku do zapisania |
| Stream |
TStream. Zapisuje do strumienia określonego w parametrze Stream |
Opis
FileFormat może być jedną z tych stałych TXLSFileFormat
| xlHTML |
Format pliku HTML |
| xlCSV |
Format pliku wartości rozdzielanych przecinkami (CSV) |
| xlText |
Format pliku wartości rozdzielanych tabulatorami (TSV) |
| xlUnicodeCSV |
Format pliku wartości Unicode rozdzielanych przecinkami (CSV) |
| xlUnicodeText |
Format pliku wartości Unicode rozdzielanych tabulatorami (TSV) |
Przykład
Ten przykład zapisuje komórki A1:F100 na arkuszu pierwszym do pliku CSV
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.csv', xlCSV);
Ten przykład zapisuje komórki A1:F100 na arkuszu pierwszym do pliku HTML
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.html', xlHTML);
Ten przykład zapisuje komórki A1:F100 na arkuszu pierwszym do pliku TSV (wartości rozdzielane tabulatorami)
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlText);
Ten przykład zapisuje cały arkusz jako sheet.csv
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlCSV);
Ten przykład zapisuje cały arkusz jako unicode sheet.csv
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlUnicode CSV);
Ten przykład zapisuje komórki A1:F100 na arkuszu pierwszym do pliku TSV unicode (wartości rozdzielane tabulatorami)
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlUnicodeText);