CgTexture.dpr 360 B

12345678910111213141516171819202122
  1. {
  2. Cg Multi-Texturing Demo
  3. Shows how to do texture coordinate shifting with a VP and blending with a FP.
  4. Last update: 09/02/04
  5. Nelson Chu
  6. }
  7. program CgTexture;
  8. uses
  9. Forms,
  10. fCgTexture in 'fCgTexture.pas' {FormCgTexture};
  11. {$R *.res}
  12. begin
  13. Application.Initialize;
  14. Application.CreateForm(TFormCgTexture, FormCgTexture);
  15. Application.Run;
  16. end.