[lmikle]

Угу. Конечно. А lvFiles1.ItemIndex не смущает? в момент заполнения списка?

Код:

var
  Item : TListItem;
begin
  ...
  Item := lvFiles1.Items.Add;
  Item.Caption := res.name;
  if ( res.Attr = 10 ) 
    then Item.ImageIndex := 0
    else Item.ImageIndex := 1;
  ...