Whats that ?!?!??!? DELPHI spinnt !!

[stoxx]

Man möge sich mal diesen Text eins zu eins kopieren !
(Darf ich dann bei der Umstellung auf 64 Bit Technik immer mit solchen Problemen rechnen ??)
Was ist die Begründung für solch unerklärliches Verhalten ?
(Man möge auch mal word, byte oder sonstwas einsetzen)

Delphi-Quellcode:

procedure TFormTS.Button1Click(Sender: TObject);
var sl : TSTringlist;
    i : cardinal;
begin
 sl := Tstringlist.Create;
 for i := 0 to sl.Count -1 do
 begin
   showmessage('Hähhh ?!?!  Warum bin ich hier ?   ' +   inttostr(i));
 end;
 sl.Free;
end;

[edit=r_kerber] Mfg, r_kerber[/edit]