home *** CD-ROM | disk | FTP | other *** search
- object ColAText: TColAText
- Left = 250
- Top = 102
- BorderIcons = []
- BorderStyle = bsSingle
- Caption = 'Color & Texture'
- ClientHeight = 418
- ClientWidth = 531
- Color = clSilver
- Font.Color = clWindowText
- Font.Height = -18
- Font.Name = 'System'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- PixelsPerInch = 120
- TextHeight = 20
- object GroupBox1: TGroupBox
- Left = 8
- Top = 8
- Width = 513
- Height = 137
- Caption = 'Background'
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object Edit1: TEdit
- Left = 110
- Top = 28
- Width = 283
- Height = 28
- Color = clSilver
- Enabled = False
- ReadOnly = True
- TabOrder = 1
- end
- object BitBtn1: TBitBtn
- Left = 408
- Top = 28
- Width = 90
- Height = 30
- Caption = 'Browse'
- Enabled = False
- TabOrder = 2
- OnClick = BitBtn1Click
- end
- object Edit2: TEdit
- Left = 110
- Top = 68
- Width = 283
- Height = 28
- Color = clSilver
- Enabled = False
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 4
- end
- object BitBtn2: TBitBtn
- Left = 408
- Top = 68
- Width = 90
- Height = 30
- Caption = 'Browse'
- Enabled = False
- TabOrder = 5
- OnClick = BitBtn2Click
- end
- object CheckBox6: TCheckBox
- Left = 116
- Top = 106
- Width = 285
- Height = 22
- Caption = 'Include Path To Texture Image'
- TabOrder = 6
- end
- object CheckBox7: TCheckBox
- Left = 13
- Top = 33
- Width = 84
- Height = 17
- Caption = 'Color'
- TabOrder = 0
- OnClick = CheckBox7Click
- end
- object CheckBox8: TCheckBox
- Left = 13
- Top = 73
- Width = 92
- Height = 17
- Caption = 'Texture'
- TabOrder = 3
- OnClick = CheckBox8Click
- end
- end
- object GroupBox2: TGroupBox
- Left = 8
- Top = 153
- Width = 513
- Height = 208
- Caption = 'Text Colors'
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- object CheckBox5: TCheckBox
- Left = 10
- Top = 33
- Width = 96
- Height = 16
- Caption = 'Default'
- Color = clSilver
- ParentColor = False
- State = cbChecked
- TabOrder = 0
- OnClick = CheckBox5Click
- end
- object BitBtn3: TBitBtn
- Left = 410
- Top = 65
- Width = 89
- Height = 28
- Caption = 'Browse'
- Enabled = False
- TabOrder = 2
- OnClick = BitBtn3Click
- end
- object BitBtn4: TBitBtn
- Left = 410
- Top = 96
- Width = 89
- Height = 29
- Caption = 'Browse'
- Enabled = False
- TabOrder = 4
- OnClick = BitBtn4Click
- end
- object BitBtn5: TBitBtn
- Left = 410
- Top = 128
- Width = 89
- Height = 29
- Caption = 'Browse'
- Enabled = False
- TabOrder = 6
- OnClick = BitBtn5Click
- end
- object BitBtn6: TBitBtn
- Left = 410
- Top = 160
- Width = 89
- Height = 30
- Caption = 'Browse'
- Enabled = False
- TabOrder = 8
- OnClick = BitBtn6Click
- end
- object Panel1: TPanel
- Left = 180
- Top = 60
- Width = 211
- Height = 140
- Color = clSilver
- TabOrder = 9
- object Label5: TLabel
- Left = 10
- Top = 13
- Width = 191
- Height = 20
- Alignment = taCenter
- AutoSize = False
- Caption = 'Text'
- Color = clSilver
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Transparent = True
- end
- object Label6: TLabel
- Left = 10
- Top = 44
- Width = 191
- Height = 20
- Alignment = taCenter
- AutoSize = False
- Caption = 'Unchecked'
- Color = clSilver
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Transparent = True
- end
- object Label7: TLabel
- Left = 10
- Top = 75
- Width = 191
- Height = 20
- Alignment = taCenter
- AutoSize = False
- Caption = 'Checked'
- Color = clSilver
- Font.Color = clFuchsia
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Transparent = True
- end
- object Label8: TLabel
- Left = 10
- Top = 106
- Width = 191
- Height = 20
- Alignment = taCenter
- AutoSize = False
- Caption = 'Pressed'
- Color = clSilver
- Font.Color = clRed
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Transparent = True
- end
- end
- object CheckBox1: TCheckBox
- Left = 10
- Top = 75
- Width = 105
- Height = 16
- Caption = 'Text Color'
- Color = clSilver
- ParentColor = False
- TabOrder = 1
- OnClick = CheckBox1Click
- end
- object CheckBox2: TCheckBox
- Left = 10
- Top = 106
- Width = 156
- Height = 17
- Caption = 'Unchecked Link'
- Color = clSilver
- ParentColor = False
- TabOrder = 3
- OnClick = CheckBox2Click
- end
- object CheckBox3: TCheckBox
- Left = 10
- Top = 136
- Width = 129
- Height = 17
- Caption = 'Checked Link'
- Color = clSilver
- ParentColor = False
- TabOrder = 5
- OnClick = CheckBox3Click
- end
- object CheckBox4: TCheckBox
- Left = 10
- Top = 168
- Width = 129
- Height = 17
- Caption = 'Pressed Link'
- Color = clSilver
- ParentColor = False
- TabOrder = 7
- OnClick = CheckBox4Click
- end
- end
- object BitBtn7: TBitBtn
- Left = 56
- Top = 375
- Width = 153
- Height = 32
- TabOrder = 2
- OnClick = BitBtn7Click
- Kind = bkOK
- end
- object BitBtn8: TBitBtn
- Left = 280
- Top = 375
- Width = 153
- Height = 32
- TabOrder = 3
- OnClick = BitBtn8Click
- Kind = bkCancel
- end
- object OpenDialog2: TOpenDialog
- DefaultExt = 'gif'
- FileEditStyle = fsEdit
- Filter =
- 'Image Files|*.gif;*.jpg;*.tif|GIF Image Files|*.gif|JPEG Image F' +
- 'iles|*.jpg|TIFF Image Files|*.tif'
- Options = [ofReadOnly, ofPathMustExist, ofFileMustExist, ofNoReadOnlyReturn]
- Left = 448
- Top = 376
- end
- object ColorDialog1: TColorDialog
- Ctl3D = True
- Left = 488
- Top = 376
- end
- end
-