Mit dem nachfolgenden C++-Code sind es 0,8 Sekunden.
Delphi-Quellcode:
TVector normalisieren(TVector AVector)
{
float len = sqrt(AVector.x*AVector.x+AVector.y*AVector.y+AVector.z*AVector.z);
AVector.x = AVector.x / len;
AVector.y = AVector.y / len;
AVector.z = AVector.z / len;
return AVector;
}
__declspec(dllexport) void cppTesten()
{
TVector vec;
for (int i=0; i< 100000000 - 1; i++)
{
vec.x = 5.7458F;
vec.y = 3.758F;
vec.z = 7.12544F;
vec = normalisieren(vec);
}
}