123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123 |
- object ImageSelectionForm: TImageSelectionForm
- Left = 322
- Height = 373
- Top = 163
- Width = 492
- Caption = 'Image selection'
- ClientHeight = 373
- ClientWidth = 492
- OnClose = FormClose
- LCLVersion = '2.0.2.0'
- object FilesListBox: TListBox
- Left = 0
- Height = 327
- Top = 0
- Width = 160
- Align = alLeft
- ItemHeight = 0
- OnSelectionChange = FilesListBoxSelectionChange
- TabOrder = 0
- end
- object FilesSplitter: TSplitter
- Left = 160
- Height = 327
- Top = 0
- Width = 5
- end
- object SelectedPanel: TPanel
- Left = 165
- Height = 327
- Top = 0
- Width = 327
- Align = alClient
- BevelOuter = bvNone
- ClientHeight = 327
- ClientWidth = 327
- TabOrder = 2
- object PreviewScrollBox: TScrollBox
- Left = 0
- Height = 263
- Top = 0
- Width = 327
- HorzScrollBar.Page = 1
- HorzScrollBar.Visible = False
- VertScrollBar.Page = 176
- Align = alClient
- ClientHeight = 259
- ClientWidth = 323
- ParentBiDiMode = False
- TabOrder = 0
- OnResize = PreviewScrollBoxResize
- object PreviewPaintBox: TPaintBox
- Left = 0
- Height = 176
- Top = 0
- Width = 184
- OnDblClick = PreviewPaintBoxDblClick
- OnMouseUp = PreviewPaintBoxMouseUp
- OnPaint = PreviewPaintBoxPaint
- end
- end
- object HueGroupBox: TGroupBox
- Left = 0
- Height = 64
- Top = 263
- Width = 327
- Align = alBottom
- AutoSize = True
- Caption = 'Hue'
- ClientHeight = 44
- ClientWidth = 323
- TabOrder = 1
- object HueTrackBar: TTrackBar
- Left = 96
- Height = 36
- Top = 4
- Width = 217
- Max = 360
- OnChange = HueTrackBarChange
- Position = 0
- Anchors = [akTop, akLeft, akRight]
- BorderSpacing.Top = 4
- BorderSpacing.Right = 4
- BorderSpacing.Bottom = 4
- TabOrder = 0
- end
- object HueSpinEdit: TSpinEdit
- AnchorSideRight.Control = HueTrackBar
- Left = 8
- Height = 23
- Top = 12
- Width = 80
- Anchors = [akTop, akLeft, akRight]
- BorderSpacing.Left = 4
- BorderSpacing.Top = 4
- BorderSpacing.Right = 8
- BorderSpacing.Bottom = 4
- MaxValue = 360
- OnChange = HueSpinEditChange
- TabOrder = 1
- end
- end
- end
- object DecisionButtonPanel: TButtonPanel
- Left = 6
- Height = 34
- Top = 333
- Width = 480
- OKButton.Name = 'OKButton'
- OKButton.DefaultCaption = True
- OKButton.OnClick = OKButtonClick
- HelpButton.Name = 'HelpButton'
- HelpButton.DefaultCaption = True
- CloseButton.Name = 'CloseButton'
- CloseButton.DefaultCaption = True
- CancelButton.Name = 'CancelButton'
- CancelButton.DefaultCaption = True
- CancelButton.OnClick = CancelButtonClick
- Color = clForm
- TabOrder = 3
- ShowButtons = [pbOK, pbCancel]
- end
- end
|