einfache Addition...wie?

[Nicodius]

var A, x : Integer;
begin

For x := 0 to (zb.) 10 do

A(Variable..) := A(Damit A immer erweitert wird) + 10(oder wie auch immer)

If x = 10 then Label1.caption := IntToStr(A);
end;

-----
Hoffe geholfen zu haben! Nicodius