Delphi 4 Bible/Delphi_4_Bible_Tom_Swan_IDG_Books_1998.iso/source/COLORDLG/TEST.exe/0/RCDATA/TCOLORDLGFORM/TCOLORDLGFORM.txt

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