| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Загрузка текста в ТМЕМО [D6, 2000]
!DEMON! © (2006-11-20 01:57:00)Здравствуйте.
Проблема в следующем.
Пытаюсь загрузить текст в МЕМО из текстового файла (созданного не мной). В результате в МЕМО русский текст отображается абракадаброй, а англйский нормально. Думаю проблема в кодировке. Можно ли программно менять вид кодировки в ТМЕМО?
!DEMON! (2006-11-23 12:46:00) [1]Вычислил кодировку - utf8.
Наиль (2006-11-20 16:46:00) [2]> желательно с 3го символа
c 3го байта
Наиль (2006-11-20 16:45:00) [3]> Пробовал этот текстовый файл открывать через блокнот (все
> отображается нормально),
KOI-8 и OEM блокнотом отображаются ненормально.
Значит файл который ты открывал относится к Unicode.
Решение приблизительно такое.
1. Переменные строка-WideString, файл-TFileStream.
2. Открываешь файл, указываешь длину для строки (SetLength).
3. Считываешь данные из файла в строку (желательно с 3го символа. 1 и 2 - служебные)
4. Мемо1.текст:=строка
5. Закрываем файл.
Примерно так. Пусть меня поправят те, кто работал с WideString
grisme (2006-11-20 15:38:00) [4]>типа KOI или что-то в этом роде
как же KOI-то?
Anatoly Podgoretsky (2006-11-20 13:16:00) [5]> Андрей Сенченко (20.11.2006 09:20:05) [5]
For compatibility with 16-bit versions of Windows,
(c) Справочная система
Андрей Сенченко (2006-11-20 09:20:00) [6]AnsyToOem
OemToAnsi
Германн (2006-11-20 02:31:00) [7]А OEMConvert не поможет?
!DEMON! (2006-11-20 02:14:00) [8]2 Германн
Не помогло. Тут что-то с кодировкой (типа KOI или что-то в этом роде)
Пробовал этот текстовый файл открывать через блокнот (все отображается нормально), потом вырезал весь текст и сохранял в новый текстовый файл. Из нового тхт файла в МЕМО все нормально грузица... а нужно, чтобы из старого грузилось без косяков.
!DEMON! (2006-11-20 02:09:00) [9]
> Германн
Ща попробую
Германн (2006-11-20 02:05:00) [10]
> Можно ли программно менять вид кодировки в ТМЕМО?
>
Memo.Font.CharSet:=RUSSIAN_CHARSET; Может помочь. А может и нет.
| |
