Con questo codice inserivo dei dati in una TListBox, ma visto che mi sono cambiate le neccessità il codice lo vorrei adattare ad un TListView
codice:
procedure TForm1.Button2Click(Sender: TObject);
begin
  if modi=true
   then
       begin
           i:=ListView2.ItemIndex+1;
           dato[i].edit1:=edit1.Text;
           dato[i].edit2:=edit2.Text;
           dato[i].edit3:=edit3.Text;
           modi:=false;
           ListView2.DeleteSelected;
       end;
   ListView2.ItemIndex:=ListView2.ItemIndex-1;
   dato[i].edit1:=edit1.Text;
   dato[i].edit2:=edit2.Text;
   dato[i].edit3:=edit3.Text;
   ListView2.ItemIndex:=i;
   stringa:=dato[i].edit1+'     '+dato[i].edit2+'     '+dato[i].edit3;
   ListView2.Items.Add(stringa);
   i:=i+1;
   edit1.Text:='';
   edit2.Text:='';
   edit3.Text:='';
   edit1.Enabled:=false;
   edit2.Enabled:=false;
   edit3.Enabled:=false;
end;
ma come faccio ad adattarlo?