[KBEPTMEH]

Всем доброго вемени суток!
Есть одна очень интересная проблема ...

Есть компонент TRichEdit с множеством символов.
Все символы в этом компоненте перебираются поштучно.
Перебранные символы записываются во временный контейнер - TStringList

По окончанию процесса перебора символов в TRichEdit, нужно вывести результат перебора, который содержится в TStringList.
Но при попытке вывода набора символов, они выводятся не в строки, а в столбец.

Пример:
Если в TRichEdit находится слово:
ПРИВЕТ,
То в TStringList это слово будет выглядеть так:
П
Р
И
В
Е
Т.
Символы перебираю путем:
TRichEdit.SelStart := 0;
TRichEdit.SelLength := 1;
TRichEdit.SelText ...
Нужно перебирать именно так ...

Всем заранее спасибо за ответы

[PhoeniX]

Полный код выложи, как делаешь... И поподробнее, что и как ХОЧЕШЬ, чтоб происходило ("бумажная схема")

[pesi]

Код:

var
str:tstringlist;
i:integer;
s:string;
begin
s:='ПРИВЕТ';
str:=tstringlist.Create;
for i:=1 to length(s) do str.Add(s[i]);
s:=StringReplace(str.Text, #13#10, '', [rfReplaceAll]);
richedit1.Lines.Add(s);
str.Free;
end;