PortalD.dpr 1.1 KB

123456789101112131415161718192021222324252627282930
  1. {: Advanced Demo for the GLScene Portal Renderer.
  2. This example is quite big since it include a small "maze editor" : the grid
  3. defines walls and open areas, ala Wolfenstein maps, and the viewer displays
  4. the result interactively.
  5. The portal mesh generation has been compacted in BBProcess but does not
  6. generate a "perfect" portal mesh, indeed it is some kind of a worst case
  7. situation since there are many more portals than actual polygons.
  8. The GLScene portal object can handle all kind of polygonal descriptions,
  9. with not necessarily convex polygons, and non necessarily closed areas.
  10. It is optimized for T&L accelerated cards ie. only an ultra-basic culling is
  11. performed. It hasn't been tested on many map styles or 3D boards yet, but this
  12. approach just tramples any "classic" (CPU-intensive) portal renderers on my
  13. GeForce... not sure how it will scale, though.
  14. }
  15. program PortalD;
  16. uses
  17. Forms,
  18. fPortalD in 'fPortalD.pas' {FormPortal};
  19. {$R *.RES}
  20. begin
  21. Application.Initialize;
  22. Application.CreateForm(TFormPortal, FormPortal);
  23. Application.Run;
  24. end.