Graph erzeugen (x-achse 32000 pixel)

[haLLoL208]

also ich hab schonmal ein bisschen was geschafft, aber ich würds gerne mit canvas.ployline machen und nich mit canvas.lineto das hab ich schon ganz hinbekommen, dass ich selber einen graphen komplett zeichnen kann und das hatte ich dan mit formmousemove, aber diesmal will ich es ja mit nem timer machen..

Delphi-Quellcode:

var pt1:tpoint; 
getcursorpos(pt1);
label1.caption:='X:'+inttostr(pt1.x)+'  Y:'+inttostr(pt1.y)// anzeigen der koordinaten
canvas.polyline(pt1)

ich hab bloß gar keine ahnung wie man das mit array machen soll..