MathgeomGLS

1
unit faGraf3d;
2

3
interface
4

5
uses
6
  Winapi.Windows,
7
  Winapi.Messages,
8
  System.SysUtils,
9
  System.Variants,
10
  System.Classes,
11
  Vcl.Graphics,
12
  Vcl.Controls,
13
  Vcl.Forms,
14
  Vcl.Dialogs,
15

16
  GLS.AsyncTimer,
17
  GLS.Material,
18
  GLS.Cadencer,
19
  GLS.SceneViewer,
20
  GLS.BaseClasses,
21
  GLS.Scene;
22

23
type
24
  TFormGraf3d = class(TForm)
25
    GLScene1: TGLScene;
26
    GLSceneViewer1: TGLSceneViewer;
27
    GLCadencer1: TGLCadencer;
28
    GLMaterialLibrary1: TGLMaterialLibrary;
29
    GLAsyncTimer1: TGLAsyncTimer;
30
  private
31
    { Private declarations }
32
  public
33
    { Public declarations }
34
  end;
35

36
var
37
  FormGraf3d: TFormGraf3d;
38

39
implementation
40

41
{$R *.dfm}
42

43
end.
44