Zykloide

[TeronG]

timer macht crash ....
timer macht

Delphi-Quellcode:

procedure TMain.startmove;
begin
  k1.free;
  k2.free;
  hmp.X:=mp.X+1;
  hmp.Y:=mp.Y;
  hPP.X:=mp.X+round(r*t-r*sin(t));
  hPP.Y:=mp.Y+round(r-r*cos(t));
  k1:=TCircle.Init(hmp,r,2,clblack);
  k2:=TCircle.Init(hPP,3,4,clred);
  k1.draw;
  k2.draw;
end;

Erst K1.free und dann k1.draw? kann net gehen (imho ^^) hab auch auf die schnelle nicht gefunden, wo du k1/k2 überhaupt erzeugst?

Zitat von morri:

Ausgeführt zum testen, exceptions bis ich nix mehr gesehen habe und dann abgeschmiert.

Sowas testet man ja auch in der IDE ^^