Как сохранить текстовый файл в кодировке Windows

← →
Drag0n (2004-09-27 12:54) [0]

var F:textfile;
begin
Writeln(F,"Вiдомiсть на списання коштiв для поповнення карткового рахунку.");
Writeln(F, DateToStr(Now)+" МФО 334464 ОКПО 09334464");
Writeln(F,"---------------------------------------------------------------------------");
Writeln(F,"| Hомер картки | Прiзвище держателя | Сума |");
Writeln(F,"---------------------------------------------------------------------------");
Сохраняется в кодировке DOS

← →
panov © (2004-09-27 13:35) [1]

Функция OemToChar, OemToCharBuff

Как сохранить текстовый файл в кодировке Windows Найти похожие ветки