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...