[Помидоркин]

Собственно: считываю текстовой файл в StringList, файлы в основном в utf-8, поэтому:

Код:

 buf:= TStringList.Create;
 buf.LoadFromFile(FFileName);
 buf.Text:= UTF8Decode(buf.Text);

Но иногда надо открыть файл windows-1251, при попытке декодировать выдает ошибку.
т.е. нужно что-то вроде:

Код:

 buf:= TStringList.Create;
 buf.LoadFromFile(FFileName);
 if {buf.Text в utf-8} buf.Text:= UTF8Decode(buf.Text);