Hallo,
du brauchst keine zusätzliche Variable um eins abzuziehen
anstatt:
Delphi-Quellcode:
for i := 1 to num_players do
begin;
j := i-1;
p[i] := Form1.Playerlist.Items.Strings[j]; //Items.Strings fängt bei 0 an, daher j := i-1
end;
geht das: (j brauchst nicht mehr)
Delphi-Quellcode:
for i := 1 to num_players do
begin;
p[i] := Form1.Playerlist.Items.Strings[i - 1];
end;
oder das:
Delphi-Quellcode:
for i := 1 to num_players do
begin;
p[i] := Form1.Playerlist.Items.Strings[Pred(i)];
end;
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<