For-Schleife und inc(x,1)

[Tommy1988]

@ Luckie: Richtig:

Habs jetzt so gemacht.

Delphi-Quellcode:

procedure TForm1.Timer2Timer(Sender: TObject);
begin
  inc(x,1);
  Caption := IntToStr(x);
if x = 5 then
 begin
   Timer2.Enabled := False
 end;
end;

Aber wieso wird denn bei der Sache mit dem Canvas nicht das x drangehängt ?