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]

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

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

mQuestion.Text :=AnsiToUTF8(st[0]);

[Olkha]

Спасибо, помогло