filelistbox i listview

Witam, mam taki kod:
var
i: Integer;
ListItem:TlistItem;
begin
ListItem:=ListView1.Items.Add;
for i := 0 to FileListBox1.Items.Count-1 do
if FileListBox1.Selected[i] then
with ListView1 do
begin
ListItem.Caption:=DirectoryListBox1.Directory+'';
ListItem.SubItems.Add(FileListBox1.Items[i]);
end;
end;
Co zrobić żeby po zaznaczeniu kilku pozycji w filelistboxie dodały się one do listview ? Aktualnie dodaje sie tylko jedna z nich.

Doda ci się jeden bo dodajesz tylko jeden element do twojego ListView-a.

Jak przeniesiesz ListItem:=ListView1.Items.Add; do środka pętli (tuż przed ListItem.Caption to będzie działać).
Nie wiem co chcesz osiągnąć, ale może warto też kasować zawartość ListView przed dodaniem nowych elementów (ListView1.Clear).

Pozdrówka