MultiMaterial.dpr 536 B

12345678910111213141516171819202122
  1. {: Basic GLMultiMaterialShader example.
  2. The GLMultiMaterialShader applies a pass for each material in
  3. the assigned MaterialLibrary. This example shows how to apply
  4. three blended textures to an object.
  5. A fourth texture is used in the specular pass to map the area
  6. affected by the chrome-like shine.
  7. }
  8. program MultiMaterial;
  9. uses
  10. Forms,
  11. fMultiMaterial in 'fMultiMaterial.pas' {FormMultiMat};
  12. {$R *.res}
  13. begin
  14. Application.Initialize;
  15. Application.CreateForm(TFormMultiMat, FormMultiMat);
  16. Application.Run;
  17. end.