Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Работа с Unicode - запись в файл [D6, D7, Win95/98, WinME, NT4, Win2k, WinXP]


Глеб ©   (2004-07-04 12:03:00) 

Я работаю с Unicode.
Использую:
var
 f: file of WideChar;

Я могу считывать из файла юникодовские символы (WideChar).
Но у меня не получается записать в файл такие символы.
Надо писать двухбайтовые символы, а программа пишет как обычные Char'ы - однобайтовые символы.
Как мне правильно организовать процедуру записи в файл Unicode?
(на входе в процедуру - строка WideString. Нужно вывести эту строку в файл и поставить в конце символ перевода строки.)


Глеб   (2004-07-07 05:44:00) [1]

Я и использовал Write! Раньше программа писала однобойтовые символы (как я писал в сообщении).

Но сейчас я уже разобрался с этой проблемой.

Оказывается, что, когда я писал write(f, ws[i]), где ws - WideString, то программа думала, что ws[i] - ЭТО ОБЫЧНЫЙ CHAR!!!
Нужно так: wch := ws[i]; write(wch);


Anatoly Podgoretsky   (2004-07-04 12:10:00) [2]

Вместо Read используй Write


Наверх

Титульная страница Поиск, карта сайта Написать письмо