von 1 bis 10 zählen und ergbnis anzeigen lassen

[Maximus]

Oder - anderer schleifen typ den du üben könntest und der in dem zusammenhang vielleicht besser ist -:

Delphi-Quellcode:

procedure ....
var i:integer;
begin
for i = 1 to 10 do
Edit1.Text := IntToStr(i);
end;