dateien paralel runterladen

[Die Muhkuh]

Delphi-Quellcode:

procedure TForm1.SpeedButton3Click(Sender: TObject);
var item : TListItem;
begin
  item:= ListView1.Items.Add;
  ListView1.Items[ListView1.Items.Count-1].Caption := YLink.Text;
  ListView1.Items[ListView1.Items.Count-1].SubItems.Add(ComboBox1.Text);
  YLink.Text:=ListView1.Column[1];
end;

Warum erstellst Du ein Item und greifst dann nicht mal drauf zu?

So geht das:

Delphi-Quellcode:

procedure TForm1.SpeedButton3Click(Sender: TObject);
var item : TListItem;
begin
  item:= ListView1.Items.Add;
  Item.Caption := YLink.Text;
  Item.SubItems.Add(ComboBox1.Text);
  
  // Zugriff
  strvar := ListView1.Items[I].Caption;
  strvar2 := ListView1.Items[I].SubItems[J];
end;