Einzelnen Beitrag anzeigen

Florian H

Registriert seit: 30. Mär 2003
Ort: Mühlacker
1.043 Beiträge
 
Delphi 6 Professional
 
#8

Re: Punkt drehen um einen anderen Punkt

  Alt 21. Apr 2005, 11:25
Zitat von glkgereon:
also mit cos und sin biste schon richtig.

Delphi-Quellcode:
radius:=sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));//Pytagoras
winkel=asin(abs(x1-x2));
winkel=winkel+90;
x2:=x1+sin(winkel)*radius;
y2:=y1+cos(winkel)*radius;
falls was nicht stimmt, tausch mal sin und cos...aber das prinzip ist imho richtig...
also selbst wenn ich an allen möglichen Stellen sin oder cos tausche - funtkionieren tut es nicht
Florian Heft
  Mit Zitat antworten Zitat