[<<D>>]

Просто переделай немного:

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
listview1.AddItem(FileListBox1.FileName,self);
end;