mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-25 10:42:20 -05:00
Test
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@220 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
parent
ca79137a39
commit
edbed662b3
@ -16,6 +16,7 @@ object ColourHistoryForm: TColourHistoryForm
|
||||
Top = 16
|
||||
Width = 328
|
||||
Columns = <>
|
||||
SmallImages = Form1.Mufasa_Image_List
|
||||
TabOrder = 0
|
||||
OnSelectItem = ChangeViewData
|
||||
end
|
||||
@ -30,7 +31,7 @@ object ColourHistoryForm: TColourHistoryForm
|
||||
end
|
||||
object SelectionName: TEdit
|
||||
Left = 360
|
||||
Height = 27
|
||||
Height = 21
|
||||
Top = 16
|
||||
Width = 112
|
||||
OnChange = ChangeName
|
||||
@ -47,7 +48,7 @@ object ColourHistoryForm: TColourHistoryForm
|
||||
end
|
||||
object ColourValue: TEdit
|
||||
Left = 360
|
||||
Height = 27
|
||||
Height = 21
|
||||
Top = 56
|
||||
Width = 112
|
||||
ReadOnly = True
|
||||
@ -56,9 +57,9 @@ object ColourHistoryForm: TColourHistoryForm
|
||||
end
|
||||
object CoordValue: TLabel
|
||||
Left = 360
|
||||
Height = 18
|
||||
Height = 14
|
||||
Top = 96
|
||||
Width = 74
|
||||
Width = 56
|
||||
Caption = 'CoordValue'
|
||||
ParentColor = False
|
||||
end
|
||||
|
@ -1,22 +1,21 @@
|
||||
{ This is an automatically generated lazarus resource file }
|
||||
|
||||
LazarusResources.Add('TColourHistoryForm','FORMDATA',[
|
||||
'TPF0'#18'TColourHistoryForm'#17'ColourHistoryForm'#4'Left'#3#145#1#6'Height'
|
||||
+#3#250#0#3'Top'#3'X'#1#5'Width'#3#233#1#13'ActiveControl'#7#13'SelectionName'
|
||||
+#7'Caption'#6#21'Colour Picker History'#12'ClientHeight'#3#250#0#11'ClientWi'
|
||||
+'dth'#3#233#1#6'OnHide'#7#15'UnSetCHShowMenu'#6'OnShow'#7#13'SetCHShowMenu'
|
||||
+#10'LCLVersion'#6#6'0.9.29'#0#9'TListView'#10'ColourList'#4'Left'#2#16#6'Hei'
|
||||
+'ght'#3#176#0#3'Top'#2#16#5'Width'#3'H'#1#7'Columns'#14#0#8'TabOrder'#2#0#12
|
||||
+'OnSelectItem'#7#14'ChangeViewData'#0#0#7'TButton'#12'DeleteButton'#4'Left'#2
|
||||
+#16#6'Height'#2#25#3'Top'#3#208#0#5'Width'#3#128#0#7'Caption'#6#6'Delete'#7
|
||||
+'OnClick'#7#14'DeleteSelected'#8'TabOrder'#2#1#0#0#5'TEdit'#13'SelectionName'
|
||||
+#4'Left'#3'h'#1#6'Height'#2#27#3'Top'#2#16#5'Width'#2'p'#8'OnChange'#7#10'Ch'
|
||||
+'angeName'#8'TabOrder'#2#2#4'Text'#6#4'Name'#0#0#7'TButton'#19'PickNewColour'
|
||||
+'Button'#4'Left'#3#216#0#6'Height'#2#25#3'Top'#3#208#0#5'Width'#3#128#0#7'Ca'
|
||||
+'ption'#6#15'Pick New Colour'#8'TabOrder'#2#3#0#0#5'TEdit'#11'ColourValue'#4
|
||||
+'Left'#3'h'#1#6'Height'#2#27#3'Top'#2'8'#5'Width'#2'p'#8'ReadOnly'#9#8'TabOr'
|
||||
+'der'#2#4#4'Text'#6#11'ColourValue'#0#0#6'TLabel'#10'CoordValue'#4'Left'#3'h'
|
||||
+#1#6'Height'#2#18#3'Top'#2'`'#5'Width'#2'J'#7'Caption'#6#10'CoordValue'#11'P'
|
||||
+'arentColor'#8#0#0#6'TImage'#11'ColourImage'#4'Left'#3#152#0#6'Height'#2#24#3
|
||||
+'Top'#3#209#0#5'Width'#2'8'#0#0#0
|
||||
+'ght'#3#176#0#3'Top'#2#16#5'Width'#3'H'#1#7'Columns'#14#0#11'SmallImages'#7
|
||||
+#23'Form1.Mufasa_Image_List'#8'TabOrder'#2#0#12'OnSelectItem'#7#14'ChangeVie'
|
||||
+'wData'#0#0#7'TButton'#12'DeleteButton'#4'Left'#2#16#6'Height'#2#25#3'Top'#3
|
||||
+#208#0#5'Width'#3#128#0#7'Caption'#6#6'Delete'#7'OnClick'#7#14'DeleteSelecte'
|
||||
+'d'#8'TabOrder'#2#1#0#0#5'TEdit'#13'SelectionName'#4'Left'#3'h'#1#6'Height'#2
|
||||
+#21#3'Top'#2#16#5'Width'#2'p'#8'OnChange'#7#10'ChangeName'#8'TabOrder'#2#2#4
|
||||
+'Text'#6#4'Name'#0#0#7'TButton'#19'PickNewColourButton'#4'Left'#3#216#0#6'He'
|
||||
+'ight'#2#25#3'Top'#3#208#0#5'Width'#3#128#0#7'Caption'#6#15'Pick New Colour'
|
||||
+#8'TabOrder'#2#3#0#0#5'TEdit'#11'ColourValue'#4'Left'#3'h'#1#6'Height'#2#21#3
|
||||
+'Top'#2'8'#5'Width'#2'p'#8'ReadOnly'#9#8'TabOrder'#2#4#4'Text'#6#11'ColourVa'
|
||||
+'lue'#0#0#6'TLabel'#10'CoordValue'#4'Left'#3'h'#1#6'Height'#2#14#3'Top'#2'`'
|
||||
+#5'Width'#2'8'#7'Caption'#6#10'CoordValue'#11'ParentColor'#8#0#0#6'TImage'#11
|
||||
+'ColourImage'#4'Left'#3#152#0#6'Height'#2#24#3'Top'#3#209#0#5'Width'#2'8'#0#0
|
||||
+#0
|
||||
]);
|
||||
|
@ -92,6 +92,7 @@ begin
|
||||
it := ColourList.Items.Add;
|
||||
it.Data := c;
|
||||
it.Caption:= c.Name;
|
||||
it.ImageIndex:= 7;//just an example
|
||||
ColourList.Selected := it;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user