[DELPHI]prendere item e subitem da listview

[funnylux]

Ciao
sto impazzendooo
ho una listview che viene popolata da un TOpenDialog in questo modo

  for i := 0 to openDialog1.Files.Count-1 do
    begin
  ListItem := ListView1.Items.Insert(i);
  ListItem.Caption := ExtractFileName(openDialog1.Files[i]);
  ListItem.SubItems.Text := ExtractFilePath(openDialog1.Files[i]);
  end; 

e fino a qui tutto ok... carica il tutto...
adesso dovrei una volta popolata al click concatenare i item e subitem e mandarli ad una variabile..
il problema è che di subitem viene preso solo il primo carattere
questo il codice

   mp3File := 
   Listview1.Items[Listview1.ItemIndex].SubItems.text[1+Listview1.ItemIndex]+
   Listview1.Items[Listview1.ItemIndex].Caption
   ; 

VVoVe: