Zitat von
Nuclear-Ping:
Alternativ gänge auch eine repeat- oder while-Schleife.
Delphi-Quellcode:
lphi := 0;
while (lphi < 189.0) do
begin
...
lphi := lphi + 13.5;
end;
wobei es hier auch wieder probleme mit der Berechnung gibt.
for lphi : = 202.5 to 229.5 do
Zitat:
229.5-202.5/13.5
Gut hier wäre der teiler 2 kann aber nicht bei null anfangen
Das würde ja dann nicht mehr funktionieren!
lphi := 13.5 * i
habe es so gelößt
Delphi-Quellcode:
glColor3f(1.0,1.0,0.0);
lphi := 202.5;
for i := 1 to 2 do
begin
if not (lphi = 216) then
lphi := lphi + 13.5 * i
else
lphi := lphi + 13.5;
gibt bestimmt eine intelligentere methode(berechnung)
gruss Emil