12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091 |
- object Form1: TForm1
- Left = 192
- Top = 119
- Caption = 'Ducky'
- ClientHeight = 420
- ClientWidth = 652
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 161
- Height = 420
- Align = alLeft
- TabOrder = 0
- object Label1: TLabel
- Left = 16
- Top = 32
- Width = 50
- Height = 13
- Caption = 'Resolution'
- end
- object TrackBar1: TTrackBar
- Left = 16
- Top = 48
- Width = 129
- Height = 25
- Max = 50
- Min = 1
- Position = 20
- TabOrder = 0
- ThumbLength = 10
- TickStyle = tsManual
- OnChange = TrackBar1Change
- end
- object CheckBox1: TCheckBox
- Left = 24
- Top = 136
- Width = 97
- Height = 17
- Caption = 'WireFrame'
- TabOrder = 1
- OnClick = CheckBox1Click
- end
- end
- object GLSceneViewer1: TGLSceneViewer
- Left = 161
- Top = 0
- Width = 491
- Height = 420
- Camera = GLCamera1
- Buffer.AntiAliasing = aa4xHQ
- FieldOfView = 153.215011596679700000
- Align = alClient
- OnMouseDown = GLSceneViewer1MouseDown
- OnMouseMove = GLSceneViewer1MouseMove
- TabOrder = 1
- end
- object GLScene1: TGLScene
- Left = 176
- Top = 16
- object GLDummyCube1: TGLDummyCube
- CubeSize = 1.000000000000000000
- object GLCamera1: TGLCamera
- DepthOfView = 100.000000000000000000
- FocalLength = 50.000000000000000000
- TargetObject = GLDummyCube1
- Position.Coordinates = {000040C000004040000040400000803F}
- Direction.Coordinates = {00000000000080BF0000000000000000}
- Up.Coordinates = {00000000000000000000803F00000000}
- object GLLightSource1: TGLLightSource
- ConstAttenuation = 1.000000000000000000
- SpotCutOff = 180.000000000000000000
- end
- end
- end
- object GLActor1: TGLActor
- Material.FrontProperties.Diffuse.Color = {0000803F0000803F000000000000803F}
- Material.FrontProperties.Shininess = 50
- Material.FrontProperties.Specular.Color = {0000803F0000803F0000803F0000803F}
- Interval = 100
- end
- end
- end
|