Darstellung Kanonenschussbahn

[Affenprinz]

also nach langem hin und her probieren wend ich mich nu mal hier ans tolle forum.

also ich stosse bei meinem beleg aufgabe2: kanonenschussbahn auf das problem das mir mein delphi den ganzen spass nicht zeichen will bzw mir nur eine gerade entlang der y-achse malt was mich schliessen´lässt das das programm nicht versteht bei änderung des x-wertes nen neuen y wert zu berechnen und dann ne linie hinzumalen

    repeat

     x:=x+1;
     y:=tan(al2)*x-(g*sqr(x))/2*sqr(v0)*sqr(cos(al2));
     y2:=round(y);
     lineto(x+30,240+y2);


     until
     x=round(ww);  //ww = wurfweite weiter oben schon berechnet!

is das so falsch oder was muss ich machen damit der ne prabel zeichnet.

for to schleife ging genau so nicht,komme einfach net weiter#

danke schon mal

mfg

[n-w]

Ich würde das anders angehen und die Fkt. PolyLine verwenden.
Definierts dazu ein Array: array1 : array [0 .. 99] of TPoint;

Damit hast du 100 Punkte, die du mit einer Schleife mit Werten deiner Fkt. füllen darfst. Nachher einfach PolyLine(array1) aufrufen und fertig.
Ich denke das geht besser.