Importuje textový soubor CSV nebo TSV nebo datový proud do listu sešitu
TXLSWorkbook.OpenCSV poskytuje vstupní bod fasády klasického XLS a TXLSXWorkbook.OpenCSV poskytuje stejné chování importu pro fasádu XLSX
Syntaxe
function OpenCSV(FileName: WideString): Integer;
function OpenCSV(FileName: WideString; ASeparator: WideChar; ADetectTypes: Boolean): Integer;
function OpenCSV(Stream: TStream): Integer;
function OpenCSV(Stream: TStream; ASeparator: WideChar; ADetectTypes: Boolean): Integer;
function OpenCSV(const FileName: WideString; const AOptions: TXlsCsvImportOptions): Integer;
function OpenCSV(Stream: TStream; const AOptions: TXlsCsvImportOptions): Integer;
| FileName | WideString. Úplná nebo relativní cesta k textovému souboru s oddělovači |
| Stream | TStream. Kompletní data CSV nebo TSV k importu |
| ASeparator | WideChar. Použijte #0 pro automatické rozpoznání čárky, středníku, tabulátoru nebo svislé čáry z prvního vyplněného řádku; jinak zadejte oddělovač, který se má použít #0 pro automatické rozpoznání čárky, středníku, tabulátoru nebo svislé čáry z prvního vyplněného řádku; jinak zadejte oddělovač, který se má použít |
| ADetectTypes | Boolean. When True, pole se tam, kde to jde, převádějí na číselné, datumově-časové nebo booleovské varianty. Když FalseBoolean. Když je True, pole se tam, kde to jde, převádějí na číselné, datumové/časové nebo Boolean varianty. Když je False, pole zůstávají textem, což je užitečné pro počáteční nuly a dlouhé identifikátory |
| AOptions | TXlsCsvImportOptions. Použijte TXlsCsvImportOptions.Default pro deterministické výchozí hodnoty na každém podporovaném kompilátoru a podle potřeby pak nastavte Separator, DetectTypes, SkipRowsnebo AutoTrim as needed |
Chování
Importer detekuje značky UTF-8 a UTF-16 byte-order marks, analyzuje pole uzavřená v uvozovkách dle RFC 4180 a zapíše analyzovanou mřížku do listu. Volání Open(FileName) na cestu .csv nebo
.tsv se automaticky přesměruje na tento importer
Příklad
Workbook.OpenCSV('orders.csv');
Workbook.OpenCSV('part-numbers.tsv', #9, False);
Options := TXlsCsvImportOptions.Default;
Options.SkipRows := 1;
Options.AutoTrim := True;
Workbook.OpenCSV('orders-with-heading.csv', Options);
Viz také