Simba/Projects/Simba/colourhistory.lfm

149 lines
3.0 KiB
Plaintext

object ColourHistoryForm: TColourHistoryForm
Left = 374
Height = 260
Top = 335
Width = 499
Caption = 'Colour Picker History'
ClientHeight = 240
ClientWidth = 499
Constraints.MinHeight = 200
Constraints.MinWidth = 490
Menu = CHMainMenu
OnCreate = FormCreate
OnHide = UnSetCHShowMenu
OnShow = SetCHShowMenu
LCLVersion = '0.9.29'
object DeleteButton: TButton
Left = 16
Height = 25
Top = 198
Width = 128
Anchors = [akLeft, akBottom]
Caption = 'Delete'
OnClick = DeleteSelected
TabOrder = 0
end
object SelectionName: TEdit
Left = 370
Height = 21
Top = 16
Width = 112
Anchors = [akTop, akRight]
OnChange = ChangeName
OnKeyPress = SelectionNameKeyPress
TabOrder = 1
Text = 'Name'
end
object PickNewColourButton: TButton
Left = 226
Height = 25
Top = 198
Width = 128
Anchors = [akRight, akBottom]
Caption = 'Pick New Colour'
TabOrder = 2
end
object ColourValue: TEdit
Left = 370
Height = 21
Top = 56
Width = 112
Anchors = [akTop, akRight]
ReadOnly = True
TabOrder = 3
Text = 'ColourValue'
end
object CoordValue: TLabel
Left = 370
Height = 14
Top = 96
Width = 112
Anchors = [akTop, akRight]
Caption = 'CoordValue'
Constraints.MinWidth = 112
ParentColor = False
end
object ColourImage: TImage
Left = 152
Height = 24
Top = 199
Width = 66
Anchors = [akLeft, akRight, akBottom]
end
object OkButton: TButton
Left = 402
Height = 24
Top = 199
Width = 80
Anchors = [akRight, akBottom]
Caption = 'Ok'
OnClick = OkButtonClick
TabOrder = 4
end
object CH_RGB_Label: TLabel
Left = 370
Height = 14
Top = 128
Width = 112
Anchors = [akTop, akRight]
Caption = 'RGBValues'
Constraints.MinWidth = 112
ParentColor = False
end
object ColourTree: TTreeView
Left = 8
Height = 159
Top = 16
Width = 346
Anchors = [akTop, akLeft, akRight, akBottom]
DefaultItemHeight = 16
DragMode = dmAutomatic
Images = CHImages
ScrollBars = ssAutoBoth
TabOrder = 5
OnChange = ColourTreeChange
OnDragDrop = ColourTreeDragDrop
OnDragOver = ColourTreeDragOver
end
object CHImages: TImageList
left = 424
top = 160
end
object CHMainMenu: TMainMenu
left = 360
top = 160
object CHFile: TMenuItem
Caption = 'File'
object CHClear: TMenuItem
Caption = 'Clear'
OnClick = CHClearClick
end
object CHLoad: TMenuItem
Caption = 'Load'
OnClick = CHLoadClick
end
object CHSave: TMenuItem
Caption = 'Save'
OnClick = CHSaveClick
end
end
object CHHelp: TMenuItem
Caption = 'Help'
object CHAbout: TMenuItem
Caption = 'About'
OnClick = CHAboutClick
end
end
end
object CHSaveDialog: TSaveDialog
DefaultExt = '.xml'
left = 392
top = 160
end
object CHOpenDialog: TOpenDialog
DefaultExt = '.xml'
left = 456
top = 160
end
end