Warum keine Zwischenergebnisse in Rechnung mit großn Zahlen?

[Svenkan]

Hey!
Wir überlegen uns in Informatik grade, warum bei Rechnung in einer Schleife mit innerer Ergebnisausgabe keine Zwischen-, sondern nur Endergebnisse ausgegeben werden.
Könnt ihr da helfen??

Delphi-Quellcode:

procedure TForm1.Button11Click(Sender: TObject);
var start,ende,zaehler,zahl: Integer;
begin
 start:=StrToInt(Edit22.text);
 zaehler:=start;
 ende:=StrToInt(Edit23.text);
 zahl:=0;
   while zaehler<=ende do begin
    zahl:=zahl+zaehler;
    zaehler:=zaehler+1;

    Edit24.Text:=IntToStr(zahl);
   end;

 ShowMessage('Die Summe beträgt '+IntToStr(zahl)+'!');
end;