Integer Overflow

[RedShakal]

Hallo ich hab ne Frage. Ich hab ne Schleife gebastelt in ner Combobox die immer dann aufgerufen werden soll wenn man die Combobox ändert.

Delphi-Quellcode:

if Mapauswahl.ItemIndex = 0 then
    begin
      Maplist.Clear;
      Mapliste := Downloadstatus.Get('http://www.redshakal.de/kknd/login/maplist/standard.php');

      if Length(Mapliste) > 0 then
        begin
          StrArr := Explode('|', Mapliste);
        end;

      For i := 0 to 13 do
        begin
          LI:= Maplist.Items.Add;
          LI.Caption:= StrArr[i*3];
          LI.SubItems.Add(StrArr[i*3+1]);
          LI.SubItems.Add(StrArr[i*3+2]);
        end;
    end;

  if Mapauswahl.ItemIndex = 1 then
    begin
      Maplist.Clear;
      Mapliste := Downloadstatus.Get('http://www.redshakal.de/kknd/login/maplist/custom.php');

      if Length(Mapliste) > 0 then
        begin
          StrArr := Explode('|', Mapliste);
        end;

      For i := 0 to 5 do
        begin
          LI:= Maplist.Items.Add;
          LI.Caption:= StrArr[i*3];
          LI.SubItems.Add(StrArr[i*3+1]);
          LI.SubItems.Add(StrArr[i*3+2]);
        end;
    end;

Wenn ich diesen Code ausführe, bekomme ich einen Integer Overflow. Was mach ich da falsch?