Einzelnen Beitrag anzeigen

SMO

Registriert seit: 20. Jul 2005
178 Beiträge
 
Delphi XE6 Professional
 
#2

AW: Umrechnung Kosinuswert/Winkel

  Alt 8. Mär 2015, 22:06
Hallo!
Ohne deinen Code erst mal genauer zu analysieren: warum benutzt du nicht die Standard-Unit System.Math? Wahrscheinlich weil du nichts von ihr wusstest.
Einfach in die "uses" Liste aufnehmen. In System.Math sind Funktion für Umwandlung Bogenmaß<->Grad vorhanden (DegToRad, RadToDeg), sowie ArcCos und mehr.
Wenn du ein neueres Delphi hast, gibt es auch System.Math.Vectors, wo 3x3 und 4x4 Matrizen definiert sind sowie die passenden Vektoren, inklusive Skalarprodukt.


Edit: In der letzten Zeile benutzt du die lokale Variable "alphaGrad", aber die wurde vorher gar nicht initialisiert!
Statt des alten "Real" Datentyps solltest du auch besser "Single" (32 Bit) oder "Double" (64 Bit) benutzen. "Real" war mal 48 Bit, entspricht aber in neueren Delphi-Versionen "Double".

Geändert von SMO ( 8. Mär 2015 um 22:14 Uhr)
  Mit Zitat antworten Zitat