Fehler in Delphi mit For-Schleife

[Luckie]

Ich suche gerade nach einem einfachen Beispiel, einfach deshalb damit der ASM Code im CPU-Fenster übersichtlich bleibt. Leider bisher ohne Erfolg:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
  IntArray: Array of Integer;
begin
  SetLength(IntArray, 10);
  for i := 0 to 9 do
    IntArray[i] := i;
end;

Wie müsste eine Schleife aussehen, die optimiert wird und somit rückwärtsläuft? Aber sie muss möglichst einfach sein. So bald man ShowMessage oder gar IntToStr aufruft, geht es im CPU-Fenster wild durch alle möglichen calls durch.