Форум программистов
 
Расширенный поиск
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi > Lazarus, Free Pascal, CodeTyphon
Регистрация

Восстановить пароль
Повторная активизация e-mail

Excel VBA, CAD, Софт, ОС, Windows, Ubuntu, Android, VPS
Win Api, Assembler, C++, Java, Pascal, Lazarus, Delphi, OpenGL, DirectX
C#, Qt, .NET, ASP.NET, Windows Forms, ADO.NET, Framework, WPF, UWP, WinRT, XAML
HTML, CSS, JavaScript, Ajax, PHP, Perl, Python, Ruby, SQL, WordPress, API, XML, JSON, ActionScript, Flash

Ответ
 
Опции темы
Старый 06.09.2016, 01:52   #1
apromix
PHP, Delphi
Форумчанин
 
Аватар для apromix
 
Регистрация: 07.05.2008
Адрес: Украина, Черновцы
Сообщений: 384
Репутация: 47

icq: 499637481
skype: sergiytkach
По умолчанию TStringList, загрузка строк в UTF-8

Здраствуйте!
Переделываю программу с дельфи хе5 в Lazarus. При компиляции в меню получаю порезанные строки в конце.

Текст в файле в кодировке UTF8. Загружаю в TStringList так:

Код:

var
  S: TStringList;
begin
  S := TStringList.Create;
  try
    S.LoadFromFile(FileName{$IFNDEF FPC}, TEncoding.UTF8{$ENDIF});
    ...
  finally
    S.Free;
  end;

Как исправить ситуацию?

Спасибо.
__________________
Мыши плакали, кололись, но продолжали жрать кактус...
мои проекты
apromix вне форума   Ответить с цитированием
Старый 08.10.2016, 23:20   #2
avd
Форумчанин
 
Регистрация: 06.06.2010
Сообщений: 76
Репутация: 21
По умолчанию

Может
S: TStringListUTF8;
avd вне форума   Ответить с цитированием
Старый 11.10.2016, 14:17   #3
apromix
PHP, Delphi
Форумчанин
 
Аватар для apromix
 
Регистрация: 07.05.2008
Адрес: Украина, Черновцы
Сообщений: 384
Репутация: 47

icq: 499637481
skype: sergiytkach
По умолчанию

Спасибо, попробую, не знал о таком.
__________________
Мыши плакали, кололись, но продолжали жрать кактус...
мои проекты
apromix вне форума   Ответить с цитированием
Старый 11.10.2016, 23:53   #4
avd
Форумчанин
 
Регистрация: 06.06.2010
Сообщений: 76
Репутация: 21
По умолчанию

Также обратите внимание, что в Lazarus используется формат UTF-8.
Поэтому для работы с кириллицей нужно использовать ф. UTF8Length, UTF8Pos, UTF8Trim, WinCPToUTF8 и т. д. (см. модуль LazUTF8).
Ну и http://intuit.valrkl.ru/course-1265/index.html
avd вне форума   Ответить с цитированием
Ответ



Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
загрузка из тхт файла структуры,содержащую tstringlist spydark91 Общие вопросы Delphi 6 08.11.2011 15:15
Загрузка дерева в TTreeList из TStringList DemonXT Общие вопросы Delphi 2 03.07.2011 01:00
TStringList и дублирование строк us4us Общие вопросы Delphi 4 25.04.2011 22:30
Удаление дублирующихся строк в TStringList Alex Cones Общие вопросы Delphi 4 28.05.2010 20:33
Помогите с записью строк в фаил с кодировкой UTF-8 Виталий Серов Общие вопросы Delphi 1 26.03.2009 04:22




22:18.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

Покупайте на сайте www.skinon.ru уникальные чехлы и наклейки для телефонов.
купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru