Пробелы в Listview

[D_E_N]

Привет всем. не могу избавиться от пробелов между иконкой и левой гранью в listview вот код добавления

ListView2.Items.BeginUpdate;
ListView2.Clear;
memo1.clear;
memo1.Lines.LoadFromFile(TempPath+'tmp.tmp');
for i:=0 to memo1.lines.Count-1 do
if memo1.lines.Strings[i]='' then memo1.lines.Delete(i);
for i:=0 to memo1.lines.Count-1 do
with ListView2.Items.Add do
          begin
          tmp2:=Memo1.Lines[i];
          pust:=check(tmp2);
          Caption :=tmp2 ;
          ImageIndex:=check(Memo1.Lines[i]);
          if ImageIndex>0 then
          begin
          SubItems.add(razmer(Memo1.Lines[i]));
          SubItems.Add('file');
          end
          else
          SubItems.Add('Папка');
         end;
 ListView2.Items.EndUpdate;

результат приложил. ятак понял причина в timagelist там всё перещелкал а толку нет.... подскажите пожалуйста в чем проблема. заранее спасибо

[mihali4]

Элементарно, Ватсон...
В инспекторе объектов для ListView2:
LargeImages= пусто
SmallImages=ImageList1
ViewStyle=vsSmallIcon

[D_E_N]

mihali4 СПАСИБО ОГРОМНОЕ!!!!!