проблема с memo

[D_E_N]

привет всем! при добавлении из memo в listview у каждой строки удаляется первый символ как избавиться вот код

memo4.clear;
memo4.Lines.add(rtext);
for i:=0 to memo4.lines.Count-1 do
if memo4.lines.Strings[i]='' then memo4.lines.Delete(i);
ListView1.Items.BeginUpdate;
for i:=0 to memo4.lines.Count-1 do
with ListView1.Items.Add do
          begin
          //tmp2:=memo3.Lines.ValueFromIndex[i];
          //pust:=check(tmp2);
          Caption :=memo4.lines.ValueFromIndex[i] ;
          ImageIndex:=1;
          SubItems.add('Папка');
          SubItems.Add(memo4.lines.ValueFromIndex[i]);
         end;
 ListView1.Items.EndUpdate;
end;

[Sensizu]

Caption :=memo4.lines.ValueFromIndex[i] ;

Зачем?
Вот так попробуй:

Memo4.Lines[i];

[D_E_N]

пасиба огромное!