123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205 |
- object WindowSkinColourForm: TWindowSkinColourForm
- Left = 248
- Height = 262
- Top = 119
- Width = 369
- Caption = 'Window skin colour'
- ClientHeight = 262
- ClientWidth = 369
- LCLVersion = '2.0.2.0'
- object RedGroupBox: TGroupBox
- Left = 8
- Height = 45
- Top = 8
- Width = 232
- AutoSize = True
- BorderSpacing.Left = 4
- BorderSpacing.Top = 4
- Caption = 'Red'
- ClientHeight = 25
- ClientWidth = 228
- TabOrder = 0
- object RedTrackBar: TTrackBar
- AnchorSideRight.Control = RedSpinEdit
- Left = 0
- Height = 25
- Top = 0
- Width = 178
- Max = 255
- Min = -255
- OnChange = RedTrackBarChange
- Position = 0
- TickStyle = tsNone
- TabOrder = 0
- end
- object RedSpinEdit: TSpinEdit
- AnchorSideLeft.Control = RedTrackBar
- AnchorSideLeft.Side = asrBottom
- Left = 178
- Height = 25
- Top = 0
- Width = 50
- Align = alRight
- Anchors = [akTop, akLeft, akRight, akBottom]
- MaxValue = 255
- MinValue = -255
- OnChange = RedSpinEditChange
- TabOrder = 1
- end
- end
- object GreenGroupBox: TGroupBox
- AnchorSideTop.Control = RedGroupBox
- AnchorSideTop.Side = asrBottom
- Left = 8
- Height = 45
- Top = 61
- Width = 232
- AutoSize = True
- BorderSpacing.Top = 8
- Caption = 'Green'
- ClientHeight = 25
- ClientWidth = 228
- TabOrder = 1
- object GreenTrackBar: TTrackBar
- AnchorSideRight.Control = GreenSpinEdit
- Left = 0
- Height = 25
- Top = 0
- Width = 178
- Max = 255
- Min = -255
- OnChange = GreenTrackBarChange
- Position = 0
- TickStyle = tsNone
- TabOrder = 0
- end
- object GreenSpinEdit: TSpinEdit
- AnchorSideLeft.Control = GreenTrackBar
- AnchorSideLeft.Side = asrBottom
- Left = 178
- Height = 25
- Top = 0
- Width = 50
- Align = alRight
- Anchors = [akTop, akLeft, akRight, akBottom]
- MaxValue = 255
- MinValue = -255
- OnChange = GreenSpinEditChange
- TabOrder = 1
- end
- end
- object BlueGroupBox: TGroupBox
- AnchorSideTop.Control = GreenGroupBox
- AnchorSideTop.Side = asrBottom
- Left = 8
- Height = 45
- Top = 114
- Width = 232
- AutoSize = True
- BorderSpacing.Top = 8
- Caption = 'Blue'
- ClientHeight = 25
- ClientWidth = 228
- TabOrder = 2
- object BlueTrackBar: TTrackBar
- AnchorSideRight.Control = BlueSpinEdit
- Left = 0
- Height = 25
- Top = 0
- Width = 178
- Max = 255
- Min = -255
- OnChange = BlueTrackBarChange
- Position = 0
- TickStyle = tsNone
- TabOrder = 0
- end
- object BlueSpinEdit: TSpinEdit
- AnchorSideLeft.Control = BlueTrackBar
- AnchorSideLeft.Side = asrBottom
- Left = 178
- Height = 25
- Top = 0
- Width = 50
- Align = alRight
- Anchors = [akTop, akLeft, akRight, akBottom]
- MaxValue = 255
- MinValue = -255
- OnChange = BlueSpinEditChange
- TabOrder = 1
- end
- end
- object PreviewPaintBox: TPaintBox
- AnchorSideTop.Control = RedGroupBox
- AnchorSideBottom.Control = BlueGroupBox
- AnchorSideBottom.Side = asrBottom
- Left = 256
- Height = 151
- Top = 8
- Width = 105
- Anchors = [akTop, akLeft, akBottom]
- OnPaint = PreviewPaintBoxPaint
- end
- object ResultPanel: TPanel
- Left = 0
- Height = 43
- Top = 219
- Width = 369
- Align = alBottom
- AutoSize = True
- BevelOuter = bvNone
- ClientHeight = 43
- ClientWidth = 369
- TabOrder = 3
- object ResultBevel: TBevel
- Left = 0
- Height = 4
- Top = 0
- Width = 369
- Align = alTop
- Shape = bsTopLine
- end
- object ResultButtonPanel: TPanel
- Left = 111
- Height = 39
- Top = 4
- Width = 258
- Align = alRight
- BevelOuter = bvNone
- ClientHeight = 39
- ClientWidth = 258
- TabOrder = 0
- object OkBitBtn: TBitBtn
- Left = 5
- Height = 30
- Top = 5
- Width = 120
- BorderSpacing.Left = 4
- BorderSpacing.Top = 4
- BorderSpacing.Right = 4
- BorderSpacing.Bottom = 4
- Default = True
- DefaultCaption = True
- Kind = bkOK
- ModalResult = 1
- TabOrder = 0
- end
- object CancelBitBtn: TBitBtn
- Left = 133
- Height = 30
- Top = 5
- Width = 120
- BorderSpacing.Left = 4
- BorderSpacing.Top = 4
- BorderSpacing.Right = 4
- BorderSpacing.Bottom = 4
- Cancel = True
- DefaultCaption = True
- Kind = bkCancel
- ModalResult = 2
- TabOrder = 1
- end
- end
- end
- end
|