Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: Winkelberechnung

   
    by Strahlex, 15. Okt 2007
  Ich habe das Problem nun folgendermaßen gelöst:
  
  Winkel:=ArcTan((YPunkt2-YPunkt1)/(XPunkt2-XPunkt1)) *180/PI;
  
  if ((YPunkt2 > YPunkt1) and (XPunkt2 < XPunkt1)) or ((YPunkt2 < YPunkt1) and (XPunkt2 < XPunkt1)) then
  Winkel := Winkel + 180
  else if ((YPunkt2 < YPunkt1) and (XPunkt2 > XPunkt1)) then
  Winkel := Winkel +360;
  
  THX an alle! :cheers:
• Forum: Programmieren allgemein

  Winkelberechnung

   
    by Strahlex, 14. Okt 2007
  Hallo!
  
  Ich habe ein Delphi-Mathematisches Problem:
  
  ich benötige eine Formel für den Winkel von Punkt1 zu Punkt2 in Grad, wenn jeweils X und Y gegeben sind:
  
  http://www.directupload.com/showoriginal-19871.jpg
  
  Bitte um Hilfe