NewtonPickD.dpr 578 B

12345678910111213141516171819202122
  1. (* Newton Game Dynamics Physics Engine demo.
  2. This example show how to move a body by calling the pick function of joint.
  3. Change kinematicControllerOptions.PickModeLinear to feel the difference.
  4. Most of the code must be written by developer in mouse events.
  5. Created by Franck Papouin 17/09/10
  6. *)
  7. program NewtonPickD;
  8. uses
  9. Forms,
  10. fdMousePick in 'fdMousePick.pas' {FormNewtonMousePick};
  11. {$R *.res}
  12. begin
  13. Application.Initialize;
  14. Application.MainFormOnTaskbar := True;
  15. Application.CreateForm(TFormNewtonMousePick, FormNewtonMousePick);
  16. Application.Run;
  17. end.