GLPhysicsRegister.pas 772 B

12345678910111213141516171819202122232425262728293031
  1. //
  2. // This unit is part of the GLScene Engine, http://glscene.org
  3. //
  4. unit GLPhysicsRegister;
  5. (* DesignTime registration code for the Physics Managers *)
  6. interface
  7. uses
  8. System.Classes,
  9. GLS.ODEManager,
  10. GLS.NGDManager,
  11. GLS.PhysicsManager;
  12. procedure Register;
  13. // ------------------------------------------------------------------
  14. implementation
  15. // ------------------------------------------------------------------
  16. procedure Register;
  17. begin
  18. RegisterClasses([TGLODEManager, TGLODEJointList, TGLODEJoints, TGLODEElements,
  19. TGLNGDManager, TGLNGDDynamic, TGLNGDStatic]);
  20. RegisterComponents('GLScene',[TGLODEManager,TGLODEJointList,
  21. TGLNGDManager, TGLPhysicsManager]);
  22. end;
  23. end.