VPF::Загрузка и чтение текстового файла в UTF

StudentPSTU

Дата 27.3.2009, 01:05 (ссылка)

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

Загрузка ...

Новичок

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

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

Здравствуйте, коллеги! Я работаю во Флэше, но в текущем проекте пришлось задействовать Delphi.
Помогите написать программу для чтения обычного (ANSI) текстового файла и затем сохранения его в текстовый файл UTF.
Весь вечер перелапачивал форумы, нашел исходники где создают новый файл UTF и нашел исходник где сохраняют и загружают файл, но там используются разные методы и связать их не получается. Друзья, помогите с проблемой. Всем заранее спасибо.

Dmi3ev

Дата 27.3.2009, 03:15 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1698
Регистрация: 28.11.2007

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

StudentPSTU, ну показывай свои наработки, находки и задумки...

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

Frees

Дата 27.3.2009, 09:29 (ссылка)

(голосов:1)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 16
Всего: 54

Код


var s: TStringList;
begin
  s := TStringList.Create;
  try
    s.LoadFromFile('1.txt');
    s.Text := AnsiToUtf8(s.Text);
    s.SaveToFile('2.txt');
  finally
    s.Free;
  end;

может так получится?

Добавлено через 4 минуты и 55 секунд
или

Код


 s.Text := #239#187#191 + AnsiToUtf8(s.Text);

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

Кольцов Виктор Владимирович

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