Irgendetwas stimmt da mit meiner Zahlenkunst aber noch nicht.
Wenn ich eine StringListe mit 10 Einträgen habe:
Delphi-Quellcode:
{*
=> sl.Count = 10 Einträge
1:
- 0 bis (sl.Count-1) div 2 == 0 bis 4 (5 Strings)
2:
- 4+1 bis (sl.Count-1) == 5 bis 9 (5 Strings)
*}
Nur wie müssen dann die Schleifen aussehen, die die Variablen hochzählen?
Delphi-Quellcode:
for i := 0 to ((sl.Count) div 2) - 1 do
Inc(run1);
for i := run1 to sl.Count - 1 do
Inc(run2);
ShowMessage('Von ' + IntToStr(0) + ' bis ' + IntToStr(run1) + sLineBreak + 'Von ' + IntToStr(run2) + ' bis ' + IntToStr(sl.Count - 1));
Das hier ergibt "0 bis 5" und "5 bis 9".
Bei ungeraden Zahlen (11 Einträge) ist es korrekt.