Перекодировка файла

← →
Kniaz © (2004-10-18 10:28) [0]

Есть досавская программа, которая записывает в файл некую информацию. И есть программа на Delphi которая обрабатывает этот файл. Как в программе на Delphi поменять кодировку этого файла с Dos на Windows, а то как то не очень хочется работать с каракулями вместо нормальных символов.

← →
[lamer]Barmaglot © (2004-10-18 10:37) [1]

AnsiToOem?
OemToAnsi?

CharToOEM
OEMToChar
CharToOEMBuff
OEMToCharBuff
OemToAnsi
AnsiToOem

Пример чтения текста dos из файла в memo

procedure TForm1.FormCreate(Sender: TObject);
var
N: PChar;
begin
memo1.Lines.LoadFromFile("c:\file.txt");
N := Memo1.Lines.GetText;
OemToAnsi(N, N);
Memo1.Lines.Text := StrPas(N);
end;

Перекодировка файла Найти похожие ветки