| 123456789101112131415161718192021 |
- {: Per-Pixel phong shading demo.
- The TGLPhongShader implements phong shading through the use of an
- ARB vertex and fragment program. So far only the material and light
- properties are supported, some form of texture support will be
- added in future updates.
- }
- program PhongD;
- uses
- Forms,
- fPhongD in 'fPhongD.pas' {Form1};
- {$R *.res}
- begin
- Application.Initialize;
- Application.CreateForm(TForm1, Form1);
- Application.Run;
- end.
|