Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.032 c