GLScene/Source/FRColorEditor.dfm

object RColorEditor: TRColorEditor
  Left = 0
  Top = 0
  Width = 289
  Height = 95
  AutoSize = True
  TabOrder = 0
  TabStop = True
  OnResize = FrameResize
  object Label1: TLabel
    Left = 0
    Top = 2
    Width = 31
    Height = 19
    Caption = 'Red'
    Font.Charset = ANSI_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 0
    Top = 26
    Width = 46
    Height = 19
    Caption = 'Green'
    Font.Charset = ANSI_CHARSET
    Font.Color = clLime
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label3: TLabel
    Left = 0
    Top = 50
    Width = 35
    Height = 19
    Caption = 'Blue'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label4: TLabel
    Left = 0
    Top = 74
    Width = 44
    Height = 19
    Caption = 'Alpha'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object ColorEditorPaintBox: TPaintBox
    Left = 0
    Top = 0
    Width = 289
    Height = 95
    Align = alClient
    OnMouseDown = ColorEditorPaintBoxMouseDown
    OnMouseMove = ColorEditorPaintBoxMouseMove
    OnMouseUp = ColorEditorPaintBoxMouseUp
    OnPaint = ColorEditorPaintBoxPaint
  end
  object PAPreview: TPanel
    Left = 220
    Top = 6
    Width = 33
    Height = 73
    Hint = 'Double-click to select with Windows color picker'
    BevelInner = bvRaised
    BevelOuter = bvLowered
    BorderWidth = 1
    Color = clLime
    TabOrder = 0
    Visible = False
    OnDblClick = PAPreviewDblClick
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 289
    Height = 95
    Alignment = taLeftJustify
    BevelOuter = bvNone
    Caption = '                Color edit frame'
    TabOrder = 1
    Visible = False
  end
  object RedEdit: TEdit
    Left = 176
    Top = 4
    Width = 33
    Height = 22
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    Text = '0'
    OnChange = RedEditChange
  end
  object GreenEdit: TEdit
    Left = 176
    Top = 26
    Width = 33
    Height = 22
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    Text = '0'
    OnChange = GreenEditChange
  end
  object BlueEdit: TEdit
    Left = 176
    Top = 48
    Width = 33
    Height = 22
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    Text = '0'
    OnChange = BlueEditChange
  end
  object AlphaEdit: TEdit
    Left = 176
    Top = 70
    Width = 33
    Height = 22
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    Text = '0'
    OnChange = AlphaEditChange
  end
  object ColorDialog: TColorDialog
    Left = 232
    Top = 24
  end
end