mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-25 10:42:20 -05:00
865779c59a
Windows users now have the option to use a console or not (it's the little CMD-image-button). Non-important information will still be written to the console (so you must open it if you want some lil extra information). Now default compiles *without* the -WG switch, otherwise you LCL will raise exceptions when the Console is closed Added some exceptions to the Files unit, rather than returning -1. Use mDebug to write something to the terminal (it's inside the MufasaBase unit). git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@581 3f818213-9676-44b0-a9b4-5e4c4e03d09d
150 lines
3.1 KiB
Plaintext
150 lines
3.1 KiB
Plaintext
object ColourHistoryForm: TColourHistoryForm
|
|
Left = 374
|
|
Height = 260
|
|
Top = 335
|
|
Width = 499
|
|
ActiveControl = SelectionName
|
|
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
|