home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi 4 Bible
/
Delphi_4_Bible_Tom_Swan_IDG_Books_1998.iso
/
source
/
COLORDLG
/
TEST.exe
/
0
/
RCDATA
/
TCOLORDLGFORM
/
TCOLORDLGFORM.txt
Wrap
Text File
|
1998-05-14
|
3KB
|
156 lines
object ColorDlgForm: TColorDlgForm
Left = 203
Top = 111
BorderStyle = bsDialog
Caption = 'Color Selection Dialog'
ClientHeight = 167
ClientWidth = 386
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
OnActivate = FormActivate
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 16
object Bevel1: TBevel
Left = 16
Top = 8
Width = 353
Height = 113
end
object RedLabel: TLabel
Left = 32
Top = 24
Width = 30
Height = 16
Caption = '&Red:'
FocusControl = RedEdit
end
object GreenLabel: TLabel
Left = 32
Top = 56
Width = 43
Height = 16
Caption = '&Green:'
FocusControl = GreenEdit
end
object BlueLabel: TLabel
Left = 32
Top = 88
Width = 34
Height = 16
Caption = '&Blue:'
FocusControl = BlueEdit
end
object RedSB: TScrollBar
Left = 88
Top = 24
Width = 121
Height = 17
LargeChange = 10
Max = 255
TabOrder = 0
OnChange = SBChange
end
object GreenSB: TScrollBar
Tag = 1
Left = 88
Top = 56
Width = 121
Height = 17
LargeChange = 10
Max = 255
TabOrder = 2
OnChange = SBChange
end
object BlueSB: TScrollBar
Tag = 2
Left = 88
Top = 88
Width = 121
Height = 17
LargeChange = 10
Max = 255
TabOrder = 4
OnChange = SBChange
end
object RedEdit: TEdit
Left = 224
Top = 22
Width = 33
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = '0'
OnChange = EditChange
end
object GreenEdit: TEdit
Tag = 1
Left = 224
Top = 54
Width = 33
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = '0'
OnChange = EditChange
end
object BlueEdit: TEdit
Tag = 2
Left = 224
Top = 86
Width = 33
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
Text = '0'
OnChange = EditChange
end
object ColorEdit: TEdit
Left = 280
Top = 32
Width = 73
Height = 24
TabStop = False
Color = clBlack
Enabled = False
ReadOnly = True
TabOrder = 8
end
object OkBitBtn: TBitBtn
Left = 280
Top = 128
Width = 89
Height = 33
TabOrder = 7
OnClick = OkBitBtnClick
Kind = bkOK
end
object CancelBitBtn: TBitBtn
Left = 176
Top = 128
Width = 89
Height = 33
TabOrder = 6
OnClick = CancelBitBtnClick
Kind = bkCancel
end
end