MultiProxy.dpr 670 B

12345678910111213141516171819202122
  1. {: Illustrates the use of TGLMultiProxy to perform discreet LOD.
  2. The MultiProxy object is used to switch automatically between three models
  3. of varying resolution (since I'm no good at modelling, these are only
  4. three resolution levels of a sphere).
  5. You'll find the MultiProxy under the GLParticles object in DCTarget,
  6. the TGLParticles object is used to automatically duplicate the MultiProxy
  7. and its settings (happens in FormCreate).
  8. }
  9. program MultiProxy;
  10. uses
  11. Forms,
  12. fMultiProxy in 'fMultiProxy.pas' {FormMultiProxy};
  13. {$R *.res}
  14. begin
  15. Application.Initialize;
  16. Application.CreateForm(TFormMultiProxy, FormMultiProxy);
  17. Application.Run;
  18. end.