Для перекодировки из Win(1251) кодовой страницы в Dos(866) кодовую страницу и обратно используются функции:
Пример чтения текста 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;