VPF::Сохранение в файле юникодного текста

Абабо

Дата 4.6.2007, 21:47 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 158
Регистрация: 14.1.2005

Репутация: нет
Всего: 1

Подскажите, пожалуйста, чайнику в Delphi, как можно сохранить в файле юникодный текст? Пробовал через WideString и WriteLn, но он всё равно в ansi сохраняет... как быть?

--------------------

С уважением, Абабо.

MetalFan

Дата 4.6.2007, 21:57 (ссылка)

(нет голосов)

Загрузка ...

Аццкий Сотона

Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 22
Всего: 128

было уже. приводил пример.
надо использовать запись строки целиком, как буфера.
что-то типа:
lFileStrm.Write( @lWideString[1], Length(lWideString) * 2 );

--------------------

There are always someone smarter than you...

Alexeis

Дата 4.6.2007, 21:58 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 34
Всего: 459

Код


procedure TForm1.FormCreate(Sender: TObject);
var
  f : TFileStream;
  s : WideString;
begin
  f := TFileStream.Create('c:\my.txt', fmCreate);
  s := 'bla-bla-bla';
  f.WriteBuffer(s[1], length(s) * sizeof(WideChar));
  f.Free;
end;

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

Абабо

Дата 4.6.2007, 22:24 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 158
Регистрация: 14.1.2005

Репутация: нет
Всего: 1

Спасибо!

--------------------

С уважением, Абабо.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »