[<<D>>]

Код:

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
for i:=0 to filelistbox1.Items.Count-1 do
begin
listview1.AddItem(filelistbox1.Items[i],self);
// или так listview1.AddItem(filelistbox1.Directory+filelistbox1.Items[i],self);
end;
end;