- function RayCastFilter(const Body : PNewtonBody; const Normal : PFloat; CollisionID : Int; UserData : Pointer; IntersectParam : Single) : Single; cdecl;
- var
- Mass : Single;
- Ixx,Iyy,Izz : Single;
- begin
- NewtonBodyGetMassMatrix(Body, @Mass, @Ixx, @Iyy, @Izz);
- if Mass = 0 then begin
- Result := IntersectParam;
- end else begin
- Result := 1.0;
- end;
- end;