FacevsFaceD.dpr 728 B

1234567891011121314151617181920212223242526272829303132
  1. {: Face vs Face collision detection.
  2. This sample illustrates:<ul>
  3. <li>collisions between FreeForm Objects (Triangle-based)
  4. <li>collisions between Cubes
  5. <li>basic user-driven camera movements.
  6. <li>picking Objects
  7. <li>moving Objects
  8. </ul></li>
  9. Usage:<ul>
  10. <li>left Mouse will move Camera
  11. <li>right Mouse will move an object
  12. <li>left Mouse + shift will roll and pitch the object
  13. <li>Wheel scroll will zoom in/out
  14. </ul>
  15. Bernd Klaiber.
  16. (modified by DanB 08/07/2003)
  17. }
  18. program FacevsFaceD;
  19. uses
  20. Forms,
  21. fFacevsFaceD in 'fFacevsFaceD.pas' {FormFacevsFace};
  22. {$R *.RES}
  23. begin
  24. Application.Initialize;
  25. Application.CreateForm(TFormFacevsFace, FormFacevsFace);
  26. Application.Run;
  27. end.