SetIsUTF16
Вызов:
ts_file(iFileDescr, "SetIsUTF16");
Команда указывает что файл содержит данные в кодировке UTF-16.
Пример.
Считать таблицу из файла, созданного Excel командой "Сохранить текст в Unicode" (сохраняется таблица с разделителем - табуляция, в кодировке UTF-16).
int main()
{
int iTable;
object("create", "ts_table", iTable);
string sFullPath = "c:\\1.txt";
string csv_source = "";
int iFileDescr;
object("create", "ts_file", iFileDescr);
ts_file(iFileDescr, "SetIsUTF16");
int ires = ts_file(iFileDescr, "open", sFullPath, "ignore", "r");
if (ires == 0)
{
ts_file(iFileDescr, "read", csv_source);
ts_file(iFileDescr, "close");
coutvar << csv_source;
ts_table(iTable, "import_from_csv", csv_source, "\t");
string str;
ts_table(iTable, "print_to_str", str);
coutvar << str;
}
else
{
tsalert(-1, "Error", "Can't open file " + sFullPath, "Check availability of the file", "Ok");
return -1;
}
object("delete", iTable);
object("delete", iFileDescr);
}