MeshHitD.dpr 447 B

12345678910111213141516171819
  1. {: Basic raycast/mesh sample.
  2. Demonstrating how to find the intersection point between eye-screen ray
  3. and a simple mesh in orthogonal and perspective views (click on the mushroom
  4. and intersection point and normal will be calculated).
  5. }
  6. program MeshHitD;
  7. uses
  8. Forms,
  9. fMeshHitD in 'fMeshHitD.pas' {FormMeshHit};
  10. {$R *.res}
  11. begin
  12. Application.Initialize;
  13. Application.CreateForm(TFormMeshHit, FormMeshHit);
  14. Application.Run;
  15. end.