Proglem mit canvas polyline wenn vriabel verwendet wird.

[ferby]

Hallo,

Also irgendwie funktioniert das nicht wie ich will ich habe in einer timerprocedure stehen:

p:real;
p:= 700;

Delphi-Quellcode:

procedure TForm1.timerTimer(Sender: TObject);
with canvas do polyline ([Point(350,round(p)),Point(350,700)]);
p:=p-0.0001;
end;

interval steht auf 1 mili secunde.


ich will das die linie langsam länger wird, aber sie ist sofort da, warum?
Ist was an meiner überlegung falsch?