123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899 |
- object IconSelectionForm: TIconSelectionForm
- Left = 270
- Height = 517
- Top = 135
- Width = 577
- Caption = 'Select icon'
- ClientHeight = 517
- ClientWidth = 577
- OnCreate = FormCreate
- OnShow = FormShow
- LCLVersion = '2.0.0.4'
- object ResultButtonPanel: TButtonPanel
- Left = 6
- Height = 38
- Top = 473
- Width = 565
- 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 = 2
- OnKeyDown = ResultButtonPanelKeyDown
- ShowButtons = [pbOK, pbCancel]
- end
- object ManualSettingPanel: TPanel
- Left = 0
- Height = 36
- Top = 431
- Width = 577
- Align = alBottom
- AutoSize = True
- BevelOuter = bvNone
- ClientHeight = 36
- ClientWidth = 577
- Color = clForm
- ParentColor = False
- TabOrder = 1
- object IconIdLabel: TLabel
- AnchorSideTop.Control = IconIdSpinEdit
- AnchorSideTop.Side = asrCenter
- Left = 4
- Height = 18
- Top = 9
- Width = 150
- BorderSpacing.Left = 4
- Caption = 'ID of the selected icon: '
- ParentColor = False
- end
- object IconIdSpinEdit: TSpinEdit
- AnchorSideLeft.Control = IconIdLabel
- AnchorSideLeft.Side = asrBottom
- Left = 156
- Height = 28
- Top = 4
- Width = 120
- BorderSpacing.Left = 2
- BorderSpacing.Top = 4
- BorderSpacing.Bottom = 4
- MaxValue = 9999
- OnChange = IconIdSpinEditChange
- TabOrder = 0
- end
- end
- object IconsetScrollBox: TScrollBox
- Left = 0
- Height = 431
- Top = 0
- Width = 577
- HorzScrollBar.Page = 105
- HorzScrollBar.Tracking = True
- VertScrollBar.Page = 105
- VertScrollBar.Tracking = True
- Align = alClient
- ClientHeight = 427
- ClientWidth = 573
- Color = clForm
- ParentBiDiMode = False
- ParentColor = False
- TabOrder = 0
- TabStop = True
- object IconsetPaintBox: TPaintBox
- Left = 0
- Height = 105
- Top = 0
- Width = 105
- OnDblClick = IconsetPaintBoxDblClick
- OnMouseUp = IconsetPaintBoxMouseUp
- OnPaint = IconsetPaintBoxPaint
- end
- end
- end
|