Bombentrichter
Archiv => Papierkorb => Topic started by: Affenprinz on June 07, 2005, 05:16:00 pm
-
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
-
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.