DELPHI/Часто задаваемые вопросы и ответы на них/ОС и железо

Как прочитать русский текст MS-DOS

- Почему не было Windows 96?
- Очень похоже на 69.

Для перекодировки из Win(1251) кодовой страницы в Dos(866) кодовую страницу и обратно используются функции:

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;

Источник получения информации: http://www.delphiworld.narod.ru