home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 374
- Top = 212
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'Tenebrae'
- ClientHeight = 375
- ClientWidth = 418
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Label3: TLabel
- Left = 16
- Top = 11
- Width = 32
- Height = 13
- Caption = 'Profile:'
- end
- object BitBtn1: TBitBtn
- Left = 8
- Top = 336
- Width = 75
- Height = 25
- Caption = '&Exit'
- TabOrder = 0
- OnClick = BitBtn1Click
- Kind = bkCancel
- end
- object BitBtn2: TBitBtn
- Left = 88
- Top = 336
- Width = 73
- Height = 25
- Caption = '&Launch'
- TabOrder = 1
- OnClick = BitBtn2Click
- Kind = bkOK
- end
- object ComboBox2: TComboBox
- Left = 61
- Top = 8
- Width = 145
- Height = 21
- ItemHeight = 13
- TabOrder = 2
- Text = 'ComboBox2'
- OnChange = ComboBox2Change
- end
- object Button1: TButton
- Left = 216
- Top = 11
- Width = 49
- Height = 17
- Caption = 'New'
- TabOrder = 3
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 270
- Top = 11
- Width = 51
- Height = 17
- Caption = 'Delete'
- TabOrder = 4
- OnClick = Button2Click
- end
- object PageControl1: TPageControl
- Left = 8
- Top = 40
- Width = 401
- Height = 289
- ActivePage = TabSheet1
- HotTrack = True
- TabOrder = 5
- object TabSheet1: TTabSheet
- Caption = 'System'
- object Resolution: TGroupBox
- Left = 8
- Top = 12
- Width = 377
- Height = 109
- Caption = 'Resolution'
- TabOrder = 0
- object CheckBox2: TCheckBox
- Left = 16
- Top = 56
- Width = 97
- Height = 17
- Caption = 'Window'
- TabOrder = 0
- end
- object ComboBox1: TComboBox
- Left = 16
- Top = 24
- Width = 145
- Height = 21
- Style = csDropDownList
- Ctl3D = True
- ItemHeight = 13
- ParentCtl3D = False
- TabOrder = 1
- end
- end
- object GroupBox4: TGroupBox
- Left = 8
- Top = 128
- Width = 377
- Height = 121
- Caption = 'Additional command line parameters'
- Color = clBtnFace
- ParentColor = False
- TabOrder = 1
- object Edit2: TEdit
- Left = 16
- Top = 24
- Width = 345
- Height = 21
- TabOrder = 0
- end
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Graphics'
- object GroupBox1: TGroupBox
- Left = 8
- Top = 4
- Width = 185
- Height = 133
- Caption = 'Mirrors'
- Color = clBtnFace
- ParentColor = False
- TabOrder = 0
- object RadioButton1: TRadioButton
- Left = 8
- Top = 24
- Width = 113
- Height = 17
- Caption = 'Disable'
- TabOrder = 0
- end
- object RadioButton2: TRadioButton
- Left = 8
- Top = 48
- Width = 113
- Height = 17
- Caption = 'World'
- Checked = True
- TabOrder = 1
- TabStop = True
- end
- object RadioButton3: TRadioButton
- Left = 8
- Top = 72
- Width = 113
- Height = 17
- Caption = 'Full'
- TabOrder = 2
- end
- object CheckBox1: TCheckBox
- Left = 9
- Top = 104
- Width = 164
- Height = 17
- Caption = 'Force all water reflective (slow)'
- TabOrder = 3
- end
- end
- object GroupBox5: TGroupBox
- Left = 8
- Top = 144
- Width = 185
- Height = 105
- Caption = 'Other'
- TabOrder = 1
- object CheckBox6: TCheckBox
- Left = 8
- Top = 24
- Width = 81
- Height = 17
- Caption = 'Glares (slow)'
- TabOrder = 0
- end
- object ChkViewModel: TCheckBox
- Left = 8
- Top = 48
- Width = 105
- Height = 17
- Caption = 'Draw View Model'
- State = cbChecked
- TabOrder = 1
- end
- end
- object GroupBox3: TGroupBox
- Left = 200
- Top = 4
- Width = 185
- Height = 149
- Caption = 'Auto Lights (original maps only)'
- TabOrder = 2
- object Label1: TLabel
- Left = 24
- Top = 28
- Width = 64
- Height = 13
- Caption = 'Radius scale:'
- end
- object Edit1: TEdit
- Left = 96
- Top = 24
- Width = 65
- Height = 21
- TabOrder = 0
- Text = '0.4'
- end
- object Memo1: TMemo
- Left = 8
- Top = 56
- Width = 169
- Height = 81
- Cursor = crArrow
- BorderStyle = bsNone
- Color = clBtnFace
- Lines.Strings = (
- 'The amount by wich the radiusses '
- 'for the lights are scaled.'
- 'This controls the amount of the '
- 'original lights that are kept. '
- 'Zero keeps all lights, 0.4 is optimal, '
- 'and 1000 keeps no lights.')
- TabOrder = 1
- end
- end
- object GrbShadows: TGroupBox
- Left = 200
- Top = 160
- Width = 185
- Height = 89
- Caption = 'Shadows'
- TabOrder = 3
- object ChkPlayerShadow: TCheckBox
- Left = 8
- Top = 16
- Width = 89
- Height = 17
- Caption = 'Player Shadow'
- State = cbChecked
- TabOrder = 0
- end
- object ChkEntityShadows: TCheckBox
- Left = 8
- Top = 40
- Width = 97
- Height = 17
- Caption = 'Entity Shadows'
- State = cbChecked
- TabOrder = 1
- end
- object ChkWorldShadows: TCheckBox
- Left = 8
- Top = 64
- Width = 89
- Height = 17
- Caption = 'World Shadow'
- State = cbChecked
- TabOrder = 2
- end
- end
- end
- object TabSheet3: TTabSheet
- Caption = 'Textures'
- object GroupBox2: TGroupBox
- Left = 8
- Top = 136
- Width = 185
- Height = 113
- Caption = 'Rescale textures'
- TabOrder = 0
- object RadioButton5: TRadioButton
- Left = 8
- Top = 48
- Width = 65
- Height = 17
- Caption = 'Half size'
- TabOrder = 0
- end
- object RadioButton6: TRadioButton
- Left = 8
- Top = 72
- Width = 81
- Height = 17
- Caption = 'Quarter size'
- TabOrder = 1
- end
- object RadioButton4: TRadioButton
- Left = 8
- Top = 24
- Width = 81
- Height = 17
- Caption = 'Original size'
- Checked = True
- TabOrder = 2
- TabStop = True
- end
- end
- object Other: TGroupBox
- Left = 200
- Top = 8
- Width = 185
- Height = 241
- Caption = 'Other'
- TabOrder = 1
- object Label5: TLabel
- Left = 16
- Top = 124
- Width = 52
- Height = 13
- Caption = 'Anisotropy:'
- end
- object CheckBox3: TCheckBox
- Left = 16
- Top = 24
- Width = 97
- Height = 17
- Caption = 'Trilinear filtering'
- TabOrder = 0
- end
- object ChkCaustics: TCheckBox
- Left = 16
- Top = 56
- Width = 121
- Height = 17
- Caption = 'Underwater Caustics'
- State = cbChecked
- TabOrder = 1
- end
- object ChkWaterShader: TCheckBox
- Left = 16
- Top = 88
- Width = 89
- Height = 17
- Caption = 'Water Shader'
- State = cbChecked
- TabOrder = 2
- end
- object CmbAniso: TComboBox
- Left = 72
- Top = 120
- Width = 97
- Height = 21
- ItemHeight = 13
- Items.Strings = (
- '1 (None)'
- '2'
- '4'
- '8')
- TabOrder = 3
- Text = '1 (None)'
- end
- end
- object GroupBox6: TGroupBox
- Left = 8
- Top = 8
- Width = 185
- Height = 121
- Caption = 'Texture Compression'
- TabOrder = 2
- object Label6: TLabel
- Left = 24
- Top = 64
- Width = 122
- Height = 13
- Caption = '(Gives bad picture quality)'
- end
- object Label7: TLabel
- Left = 24
- Top = 96
- Width = 145
- Height = 13
- Caption = '(Gives very bad picture quality)'
- end
- object CheckBox5: TCheckBox
- Left = 8
- Top = 24
- Width = 81
- Height = 17
- Caption = 'Diffuse map'
- TabOrder = 0
- end
- object ChkBump: TCheckBox
- Left = 8
- Top = 48
- Width = 89
- Height = 17
- Caption = 'Normal maps'
- TabOrder = 1
- end
- object ChkGloss: TCheckBox
- Left = 8
- Top = 80
- Width = 97
- Height = 17
- Caption = 'System textures'
- TabOrder = 2
- end
- end
- end
- object TabSheet4: TTabSheet
- Caption = 'Sound'
- object Panel1: TPanel
- Left = 8
- Top = 8
- Width = 377
- Height = 241
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 0
- object Label2: TLabel
- Left = 16
- Top = 59
- Width = 59
- Height = 13
- Caption = 'Sample rate:'
- end
- object Label4: TLabel
- Left = 16
- Top = 91
- Width = 45
- Height = 13
- Caption = 'Bit depth:'
- end
- object ComboBox4: TComboBox
- Left = 88
- Top = 88
- Width = 145
- Height = 21
- ItemHeight = 13
- Items.Strings = (
- '8 bit'
- '16 bit')
- TabOrder = 0
- Text = '16 bit'
- end
- object ComboBox3: TComboBox
- Left = 88
- Top = 56
- Width = 145
- Height = 21
- ItemHeight = 13
- Items.Strings = (
- '11025Hz'
- '22050Hz'
- '44100Hz')
- TabOrder = 1
- Text = '11025Hz'
- end
- object ChkSound: TCheckBox
- Left = 16
- Top = 8
- Width = 57
- Height = 17
- Caption = 'Sound'
- State = cbChecked
- TabOrder = 2
- end
- object ChkCDAudio: TCheckBox
- Left = 16
- Top = 32
- Width = 65
- Height = 17
- Caption = 'CD Audio'
- State = cbChecked
- TabOrder = 3
- end
- end
- end
- object TabSheet5: TTabSheet
- Caption = 'About'
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 393
- Height = 261
- Align = alClient
- Picture.Data = {<image000.bmp>}
- end
- object PaintBox1: TPaintBox
- Left = 0
- Top = 0
- Width = 393
- Height = 261
- Align = alClient
- OnPaint = PaintBox1Paint
- end
- end
- end
- object Button3: TButton
- Left = 352
- Top = 11
- Width = 49
- Height = 17
- Caption = 'Defaults'
- TabOrder = 6
- OnClick = Button3Click
- end
- end
-