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

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

Код:

1 2 3

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

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

Код:

1 2 3

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