Форум: "Основная";
Текущий архив: 2005.01.02;
Скачать: [xml.tar.bz2];
Вниз
Не могу сделать перекодировку Найти похожие ветки
← →
Frozzen (2004-12-17 17:39) [0]Подскажите в чем дело, пишу следующие
buf : array [1..4000]of Char;
RecordBuffer : array [1..4000]of Char;
DFile: TFileStream;
S : String;
заполнение буфера
RecordBuffer[i] := S[i];
запись в файл для каждой строки
CharToOem(@RecordBuffer, @buf);
DFile.WriteBuffer(Buf, FHeader.RecordSize);
Первая строчка записывается в нужной кодировке, остальные нет ?
← →
TUser © (2004-12-17 17:46) [1]Там поинтеры на null-terminated string. Соотвественно CharToOem доходит до первого нулевого символа и заканчивает свою работу. Решение - по отдельным строчкам перекодировать
← →
MBo © (2004-12-17 17:46) [2]после строки-источника ноль добавь
← →
Frozzen (2004-12-17 17:52) [3]посмотрел дебагером
первый раз проходит все успешно
а во второй в RecordBuffer перед CharToOem
уже в дос кодировке
← →
Frozzen (2004-12-17 17:53) [4]почему не понемаю
← →
Frozzen (2004-12-17 17:56) [5]насчет добавления нуля не понял
тормажу, целый день уже этот конвектор пишу
← →
Alexander Panov © (2004-12-17 18:57) [6]Используй
OemToCharBuff
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.01.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.031 c