Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.26;
Скачать: CL | DM;

Вниз

Просмотр Dos овских файлов в RichEdit   Найти похожие ветки 

 
Mishenka   (2006-02-26 10:32) [0]

Загружаю в RichEdit текстовый файл в Dos кодировке. Вместо русских букв высвечиваются иероглифы. Подстановка OEM_CHARSET непомогла. Что тут делать?


 
ЮЮ ©   (2006-02-26 10:51) [1]

установи RichEdit.Font Name = Terminal, коль преобразовать влом. Только потом не спрашивай, а как теперь набирать DOS-овскими символами с клавиатуры


 
Mishenka   (2006-02-26 11:03) [2]

Так я установил, но ничего не изменилось.


 
ANB ©   (2006-02-26 11:09) [3]

Загружай в MEMO. Это поможет.


 
Mishenka   (2006-02-26 11:11) [4]

А что в RichEdit эта проблема не решается?


 
clickmaker ©   (2006-02-26 11:19) [5]

OemToChar()


 
Mishenka   (2006-02-26 11:23) [6]


> clickmaker ©   (26.02.06 11:19) [5]
> OemToChar()

То есть надо переводить каждую строку отдельно?


 
ANB ©   (2006-02-26 11:32) [7]


> То есть надо переводить каждую строку отдельно?

Можно и весь текст зараз.


 
clickmaker ©   (2006-02-26 11:33) [8]


> Mishenka   (26.02.06 11:23) [6]

весь текст


 
ANB ©   (2006-02-26 11:33) [9]

Но при этом "уйдет" псевдографика и некоторые спецсимволы. Для построчного варианта - то же самое, но дольше.


 
Serg1981 ©   (2006-02-26 20:37) [10]

у меня работает такая фукция:
function DosToWin(St : string) : string;
var Ch : PChar;
begin
 Ch := StrAlloc(Length(St) + 1);
 OemToAnsi(PChar(St), Ch);
 Result := Ch;
 StrDispose(Ch)
end;



Страницы: 1 вся ветка

Текущий архив: 2006.03.26;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.049 c
1-1140431149
VEZ
2006-02-20 13:25
2006.03.26
TActionToolBar


2-1141732156
VitV
2006-03-07 14:49
2006.03.26
DBCtrlGri - существует замена?


2-1141893206
nsk3d
2006-03-09 11:33
2006.03.26
Экспорт в DLL


15-1140944240
Vahan
2006-02-26 11:57
2006.03.26
Kомплексные числа . pas


2-1141829973
Nsk3D
2006-03-08 17:59
2006.03.26
вставка в функцию