TStringList: как вытащить конкретную строку?

Форум для изучающих FPC и их учителей.

Модератор: Модераторы

Ответить
Olkha
незнакомец
Сообщения: 7
Зарегистрирован: 09.03.2009 10:20:18

TStringList: как вытащить конкретную строку?

Сообщение Olkha »

Пытаюсь собрать простой проект под Lazarus, win32.
Под delphi очень просто работать со строками, такой кусок кода проходит:
St.LoadFromFile(<имя файла>);
mQuestion.Text := St[0]; //[1], [2], [3], ...
Здесь mQuestion - TMemo
Здесь - моё memo ничего не отображает. Почему?
(Перепробовала mQuestion.Append(St[0]), mQuestion.Lines.Add(St[0]))
А
St.saveToFile(<имя файла>);
работает.
В чём дело?
Vadim
долгожитель
Сообщения: 4112
Зарегистрирован: 05.10.2006 08:52:59
Откуда: Красноярск

Сообщение Vadim »

Olkha
Наверное дело в том, что в Вашем файле текст на русском языке. Lazarus требует, чтобы русский язык в видимых элементах был не иначе как в кодировке UTF-8. Попробуйте его, прежде чем засовывать в МЕМО, перекодировать:

Код: Выделить всё

mQuestion.Text :=AnsiToUTF8(st[0]);
Olkha
незнакомец
Сообщения: 7
Зарегистрирован: 09.03.2009 10:20:18

Сообщение Olkha »

Спасибо, помогло :mrgreen:
Ответить