QuadtreeCullingD.dpr 393 B

1234567891011121314151617
  1. {: Using the TOctreeSpacePartition for visibility culling.
  2. Demo by HRLI slightly reworked to be a quadtree demo and committed by MF.
  3. }
  4. program QuadtreeCullingD;
  5. uses
  6. Forms,
  7. fQuadtreeCullingD in 'fQuadtreeCullingD.pas' {frmQuadtreeVisCulling};
  8. {$R *.res}
  9. begin
  10. Application.Initialize;
  11. Application.CreateForm(TfrmQuadtreeVisCulling, frmQuadtreeVisCulling);
  12. Application.Run;
  13. end.