Загрузка текста в ТМЕМО

← →
!DEMON! (2006-11-20 01:57) [0]

Здравствуйте.
Проблема в следующем.
Пытаюсь загрузить текст в МЕМО из текстового файла (созданного не мной). В результате в МЕМО русский текст отображается абракадаброй, а англйский нормально. Думаю проблема в кодировке. Можно ли программно менять вид кодировки в ТМЕМО?

← →
Германн © (2006-11-20 02:05) [1]

> Можно ли программно менять вид кодировки в ТМЕМО?
>

Memo.Font.CharSet:=RUSSIAN_CHARSET; Может помочь. А может и нет.

← →
!DEMON! (2006-11-20 02:09) [2]

> Германн

Ща попробую

← →
!DEMON! (2006-11-20 02:14) [3]

2 Германн
Не помогло. Тут что-то с кодировкой (типа KOI или что-то в этом роде)
Пробовал этот текстовый файл открывать через блокнот (все отображается нормально), потом вырезал весь текст и сохранял в новый текстовый файл. Из нового тхт файла в МЕМО все нормально грузица... а нужно, чтобы из старого грузилось без косяков.

← →
Германн © (2006-11-20 02:31) [4]

А OEMConvert не поможет?

← →
Андрей Сенченко © (2006-11-20 09:20) [5]

AnsyToOem
OemToAnsi

← →
Anatoly Podgoretsky © (2006-11-20 13:16) [6]

> Андрей Сенченко (20.11.2006 09:20:05) [5]

For compatibility with 16-bit versions of Windows,
(c) Справочная система

← →
grisme © (2006-11-20 15:38) [7]

>типа KOI или что-то в этом роде

как же KOI-то?

> Пробовал этот текстовый файл открывать через блокнот (все
> отображается нормально),

KOI-8 и OEM блокнотом отображаются ненормально.
Значит файл который ты открывал относится к Unicode.
Решение приблизительно такое.
1. Переменные строка-WideString, файл-TFileStream.
2. Открываешь файл, указываешь длину для строки (SetLength).
3. Считываешь данные из файла в строку (желательно с 3го символа. 1 и 2 - служебные)
4. Мемо1.текст:=строка
5. Закрываем файл.
Примерно так. Пусть меня поправят те, кто работал с WideString

> желательно с 3го символа

c 3го байта

← →
!DEMON! (2006-11-23 12:46) [10]

Вычислил кодировку - utf8.

Загрузка текста в ТМЕМО Найти похожие ветки