ListView1.SmallImages:= ImageList1; for i := 0 to Listbox1.Items.Count - 1 do LV_InsertFiles(listbox1.Items.Strings[i], ListView1, Imagelist1);