dateien paralel runterladen

[bundy]

hi
ich würde das so machen.

Delphi-Quellcode:

procedure TForm1.SpeedButton3Click(Sender: TObject); 
var i:integer; 
begin 
  for i := 1 to ListView1.Items.count do
  begin
  MakeDownload(ListView1.Items[i].Caption);
  ListView1.Items[i].delete 
  end; 
end;

kann aber auch Listview1.ItemCount oder so heißen, hab jetzt leider kein Delphi offen um dir das genau sagen zu können.

Denkweise:
Eine For Schleife machen die sich so oft wiederholt wie Items in der Listview sind.
nach jedem Durchgang erhöht sich i um 1.
dazwischen die Downloadprocedure rein und anschliessend löschen.

lg
bundy

[Namenloser]

das wird so nicht funktionieren, weil sich durch das delete wieder der Index der Items ändert. Wenn schon, musst du die Schleife rückwärts laufen lassen. Was ich in diesem Fall fast noch eleganter fände wäre eine while-schleife. (while itemcount > 0 do... download(tems[0]))

[bundy]

jup oder so :)

[napstar]

danke für eure hilfe ich werd es morgen mal ausprobieren...
aber für heute ist schluss ^^

[SirThornberry]

mache bitte nächstes mal für eine neuen Frage auch ein neues Thema auf :)

[napstar]

das mit while hab ich nicht so richtig verstanden.. aber for hat nicht funktioniert ^^..

Delphi-Quellcode:

  DLname:='video'+InttoStr(i)+'.flv';
  if FileExists(downloadpfad+DLname) then begin
  for i := 1 to 2 do
  i:=i + 1;
  DLname:='video'+InttoStr(i)+'.flv';
  end;

kann mir jemand das mit dem while näher erklähren ?^^
daraus bin ich nicht schlauer geworden