function LoadStringFromFile(const FileName: String; var S: AnsiString): Boolean;
Загружает указанный текстовый файл FileName в строку S. Также поддерживаются файлы в кодировке UTF-8 с маркером BOM или без него. В случае успеха возвращает значение True, иначе — False.
Используйте для загрузки функцию LoadStringFromLockedFile, что даст возможность прочитать файл, даже если он уже открыт для записи в другой программе.
var UnicodeStr: String; ANSIStr: AnsiString; begin if LoadStringFromFile('C:\File.txt', ANSIStr) then begin UnicodeStr := String(ANSIStr); if StringChangeEx(UnicodeStr, 'FromStr', 'ToStr', True) > 0 then SaveStringToFile('C:\File.txt', AnsiString(UnicodeStr), False); end; end;