moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-17 06:45:11 -05:00
Code Issues Releases Wiki Activity

Change to allow copying colours. :p

Browse Source 
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@205 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
Wizzup? 2009-11-07 17:43:41 +00:00
parent 56ae917fda
commit 4c6cd3cdc1
4 changed files with 88 additions and 87 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

39
Projects/SAMufasaGUI/colourhistory.lfm
View File

@ -1,7 +1,7 @@
object ColourHistoryForm: TColourHistoryForm object ColourHistoryForm: TColourHistoryForm
Left = 498 Left = 494
Height = 250 Height = 250
Top = 474 Top = 299
Width = 489 Width = 489
ActiveControl = SelectionName ActiveControl = SelectionName
Caption = 'Colour Picker History' Caption = 'Colour Picker History'
@ -27,27 +27,11 @@ object ColourHistoryForm: TColourHistoryForm
OnClick = DeleteSelected OnClick = DeleteSelected
TabOrder = 1 TabOrder = 1
end end
object ColourValue: TLabel
Left = 360
Height = 18
Top = 40
Width = 9
Caption = '0'
ParentColor = False
end
object CoordValue: TLabel
Left = 360
Height = 18
Top = 73
Width = 25
Caption = '0, 0'
ParentColor = False
end
object SelectionName: TEdit object SelectionName: TEdit
Left = 360 Left = 360
Height = 27 Height = 27
Top = 104 Top = 104
Width = 104 Width = 112
OnChange = ChangeName OnChange = ChangeName
TabOrder = 2 TabOrder = 2
Text = 'Name' Text = 'Name'
@ -60,4 +44,21 @@ object ColourHistoryForm: TColourHistoryForm
Caption = 'Pick New Colour' Caption = 'Pick New Colour'
TabOrder = 3 TabOrder = 3
end end
object ColourValue: TEdit
Left = 360
Height = 27
Top = 16
Width = 112
ReadOnly = True
TabOrder = 4
Text = 'ColourValue'
end
object CoordValue: TLabel
Left = 360
Height = 18
Top = 64
Width = 74
Caption = 'CoordValue'
ParentColor = False
end
end end

32
Projects/SAMufasaGUI/colourhistory.lrs
View File

@ -1,20 +1,20 @@
{ This is an automatically generated lazarus resource file } { This is an automatically generated lazarus resource file }
LazarusResources.Add('TColourHistoryForm','FORMDATA',[ LazarusResources.Add('TColourHistoryForm','FORMDATA',[
'TPF0'#18'TColourHistoryForm'#17'ColourHistoryForm'#4'Left'#3#242#1#6'Height' 'TPF0'#18'TColourHistoryForm'#17'ColourHistoryForm'#4'Left'#3#238#1#6'Height'
+#3#250#0#3'Top'#3#218#1#5'Width'#3#233#1#13'ActiveControl'#7#13'SelectionNam' +#3#250#0#3'Top'#3'+'#1#5'Width'#3#233#1#13'ActiveControl'#7#13'SelectionName'
+'e'#7'Caption'#6#21'Colour Picker History'#12'ClientHeight'#3#250#0#11'Clien' +#7'Caption'#6#21'Colour Picker History'#12'ClientHeight'#3#250#0#11'ClientWi'
+'tWidth'#3#233#1#6'OnShow'#7#13'SetCHShowMenu'#10'LCLVersion'#6#6'0.9.29'#0#9 +'dth'#3#233#1#6'OnShow'#7#13'SetCHShowMenu'#10'LCLVersion'#6#6'0.9.29'#0#9'T'
+'TListView'#10'ColourList'#4'Left'#2#16#6'Height'#3#208#0#3'Top'#2#16#5'Widt' +'ListView'#10'ColourList'#4'Left'#2#16#6'Height'#3#208#0#3'Top'#2#16#5'Width'
+'h'#3'@'#1#7'Columns'#14#0#8'TabOrder'#2#0#12'OnSelectItem'#7#14'ChangeViewD' +#3'@'#1#7'Columns'#14#0#8'TabOrder'#2#0#12'OnSelectItem'#7#14'ChangeViewData'
+'ata'#0#0#7'TButton'#12'DeleteButton'#4'Left'#3'`'#1#6'Height'#2#25#3'Top'#3 +#0#0#7'TButton'#12'DeleteButton'#4'Left'#3'`'#1#6'Height'#2#25#3'Top'#3#199#0
+#199#0#5'Width'#3#128#0#7'Caption'#6#6'Delete'#7'OnClick'#7#14'DeleteSelecte' +#5'Width'#3#128#0#7'Caption'#6#6'Delete'#7'OnClick'#7#14'DeleteSelected'#8'T'
+'d'#8'TabOrder'#2#1#0#0#6'TLabel'#11'ColourValue'#4'Left'#3'h'#1#6'Height'#2 +'abOrder'#2#1#0#0#5'TEdit'#13'SelectionName'#4'Left'#3'h'#1#6'Height'#2#27#3
+#18#3'Top'#2'('#5'Width'#2#9#7'Caption'#6#1'0'#11'ParentColor'#8#0#0#6'TLabe' +'Top'#2'h'#5'Width'#2'p'#8'OnChange'#7#10'ChangeName'#8'TabOrder'#2#2#4'Text'
+'l'#10'CoordValue'#4'Left'#3'h'#1#6'Height'#2#18#3'Top'#2'I'#5'Width'#2#25#7 +#6#4'Name'#0#0#7'TButton'#19'PickNewColourButton'#4'Left'#3'`'#1#6'Height'#2
+'Caption'#6#4'0, 0'#11'ParentColor'#8#0#0#5'TEdit'#13'SelectionName'#4'Left' +#25#3'Top'#3#160#0#5'Width'#3#128#0#7'Caption'#6#15'Pick New Colour'#8'TabOr'
+#3'h'#1#6'Height'#2#27#3'Top'#2'h'#5'Width'#2'h'#8'OnChange'#7#10'ChangeName' +'der'#2#3#0#0#5'TEdit'#11'ColourValue'#4'Left'#3'h'#1#6'Height'#2#27#3'Top'#2
+#8'TabOrder'#2#2#4'Text'#6#4'Name'#0#0#7'TButton'#19'PickNewColourButton'#4 +#16#5'Width'#2'p'#8'ReadOnly'#9#8'TabOrder'#2#4#4'Text'#6#11'ColourValue'#0#0
+'Left'#3'`'#1#6'Height'#2#25#3'Top'#3#160#0#5'Width'#3#128#0#7'Caption'#6#15 +#6'TLabel'#10'CoordValue'#4'Left'#3'h'#1#6'Height'#2#18#3'Top'#2'@'#5'Width'
+'Pick New Colour'#8'TabOrder'#2#3#0#0#0 +#2'J'#7'Caption'#6#10'CoordValue'#11'ParentColor'#8#0#0#0
]); ]);

6
Projects/SAMufasaGUI/colourhistory.pas
View File

@ -22,10 +22,10 @@ type
{ TColourHistoryForm } { TColourHistoryForm }
TColourHistoryForm = class(TForm) TColourHistoryForm = class(TForm)
ColourValue: TEdit;
CoordValue: TLabel;
PickNewColourButton: TButton; PickNewColourButton: TButton;
DeleteButton: TButton; DeleteButton: TButton;
ColourValue: TLabel;
CoordValue: TLabel;
ColourList: TListView; ColourList: TListView;
SelectionName: TEdit; SelectionName: TEdit;
procedure ChangeName(Sender: TObject); procedure ChangeName(Sender: TObject);
@ -96,7 +96,7 @@ begin
exit; exit;
if not Item.Selected then if not Item.Selected then
exit; exit;
ColourValue.Caption := 'Colour: ' + IntToStr(TColourPickerObject(Item.Data).Colour); ColourValue.Caption := IntToStr(TColourPickerObject(Item.Data).Colour);
CoordValue.Caption := 'Coords: ' + IntToStr(TColourPickerObject(Item.Data).Pos.X) + CoordValue.Caption := 'Coords: ' + IntToStr(TColourPickerObject(Item.Data).Pos.X) +
', ' + IntToStr(TColourPickerObject(Item.Data).Pos.Y); ', ' + IntToStr(TColourPickerObject(Item.Data).Pos.Y);
SelectionName.Text := TColourPickerObject(Item.Data).Name; SelectionName.Text := TColourPickerObject(Item.Data).Name;

98
Projects/SAMufasaGUI/project1.lpi
View File

@ -726,7 +726,7 @@
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="colourpicker"/> <UnitName Value="colourpicker"/>
<CursorPos X="36" Y="188"/> <CursorPos X="36" Y="188"/>
<TopLine Value="36"/> <TopLine Value="157"/>
<EditorIndex Value="3"/> <EditorIndex Value="3"/>
<UsageCount Value="201"/> <UsageCount Value="201"/>
<Loaded Value="True"/> <Loaded Value="True"/>
@ -1511,8 +1511,8 @@
<ComponentName Value="ColourHistoryForm"/> <ComponentName Value="ColourHistoryForm"/>
<ResourceBaseClass Value="Form"/> <ResourceBaseClass Value="Form"/>
<UnitName Value="colourhistory"/> <UnitName Value="colourhistory"/>
<CursorPos X="37" Y="131"/> <CursorPos X="6" Y="88"/>
<TopLine Value="110"/> <TopLine Value="86"/>
<EditorIndex Value="4"/> <EditorIndex Value="4"/>
<UsageCount Value="28"/> <UsageCount Value="28"/>
<Loaded Value="True"/> <Loaded Value="True"/>
@ -1558,124 +1558,124 @@
</Units> </Units>
<JumpHistory Count="30" HistoryIndex="29"> <JumpHistory Count="30" HistoryIndex="29">
<Position1> <Position1>
<Filename Value="colourhistory.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="31" Column="9" TopLine="31"/> <Caret Line="825" Column="27" TopLine="808"/>
</Position1> </Position1>
<Position2> <Position2>
<Filename Value="colourhistory.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="96" Column="3" TopLine="75"/> <Caret Line="822" Column="28" TopLine="810"/>
</Position2> </Position2>
<Position3> <Position3>
<Filename Value="colourhistory.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="88" Column="22" TopLine="75"/> <Caret Line="85" Column="32" TopLine="69"/>
</Position3> </Position3>
<Position4> <Position4>
<Filename Value="testunit.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="961" Column="27" TopLine="948"/> <Caret Line="92" Column="32" TopLine="69"/>
</Position4> </Position4>
<Position5> <Position5>
<Filename Value="testunit.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="967" Column="51" TopLine="952"/> <Caret Line="501" Column="35" TopLine="484"/>
</Position5> </Position5>
<Position6> <Position6>
<Filename Value="testunit.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="974" Column="51" TopLine="952"/> <Caret Line="859" Column="51" TopLine="840"/>
</Position6> </Position6>
<Position7> <Position7>
<Filename Value="testunit.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="822" Column="6" TopLine="810"/> <Caret Line="77" Column="1" TopLine="69"/>
</Position7> </Position7>
<Position8> <Position8>
<Filename Value="testunit.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="825" Column="27" TopLine="808"/> <Caret Line="25" Column="44" TopLine="11"/>
</Position8> </Position8>
<Position9> <Position9>
<Filename Value="testunit.pas"/> <Filename Value="framescript.pas"/>
<Caret Line="822" Column="28" TopLine="810"/> <Caret Line="27" Column="46" TopLine="19"/>
</Position9> </Position9>
<Position10> <Position10>
<Filename Value="colourhistory.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="85" Column="32" TopLine="69"/> <Caret Line="51" Column="12" TopLine="28"/>
</Position10> </Position10>
<Position11> <Position11>
<Filename Value="colourhistory.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="92" Column="32" TopLine="69"/> <Caret Line="30" Column="49" TopLine="26"/>
</Position11> </Position11>
<Position12> <Position12>
<Filename Value="testunit.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="501" Column="35" TopLine="484"/> <Caret Line="38" Column="24" TopLine="26"/>
</Position12> </Position12>
<Position13> <Position13>
<Filename Value="testunit.pas"/> <Filename Value="framescript.pas"/>
<Caret Line="859" Column="51" TopLine="840"/> <Caret Line="69" Column="29" TopLine="46"/>
</Position13> </Position13>
<Position14> <Position14>
<Filename Value="colourhistory.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="77" Column="1" TopLine="69"/> <Caret Line="113" Column="3" TopLine="96"/>
</Position14> </Position14>
<Position15> <Position15>
<Filename Value="colourhistory.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="25" Column="44" TopLine="11"/> <Caret Line="36" Column="49" TopLine="23"/>
</Position15> </Position15>
<Position16> <Position16>
<Filename Value="framescript.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="27" Column="46" TopLine="19"/> <Caret Line="14" Column="63" TopLine="1"/>
</Position16> </Position16>
<Position17> <Position17>
<Filename Value="colourhistory.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="51" Column="12" TopLine="28"/> <Caret Line="115" Column="43" TopLine="100"/>
</Position17> </Position17>
<Position18> <Position18>
<Filename Value="testunit.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="30" Column="49" TopLine="26"/> <Caret Line="324" Column="37" TopLine="318"/>
</Position18> </Position18>
<Position19> <Position19>
<Filename Value="testunit.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="38" Column="24" TopLine="26"/> <Caret Line="99" Column="49" TopLine="82"/>
</Position19> </Position19>
<Position20> <Position20>
<Filename Value="framescript.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="69" Column="29" TopLine="46"/> <Caret Line="979" Column="62" TopLine="960"/>
</Position20> </Position20>
<Position21> <Position21>
<Filename Value="colourhistory.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="113" Column="3" TopLine="96"/> <Caret Line="821" Column="31" TopLine="810"/>
</Position21> </Position21>
<Position22> <Position22>
<Filename Value="colourhistory.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="36" Column="49" TopLine="23"/> <Caret Line="90" Column="43" TopLine="83"/>
</Position22> </Position22>
<Position23> <Position23>
<Filename Value="testunit.pas"/> <Filename Value="testunit.pas"/>
<Caret Line="14" Column="63" TopLine="1"/> <Caret Line="823" Column="51" TopLine="807"/>
</Position23> </Position23>
<Position24> <Position24>
<Filename Value="colourhistory.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="115" Column="43" TopLine="100"/> <Caret Line="131" Column="37" TopLine="107"/>
</Position24> </Position24>
<Position25> <Position25>
<Filename Value="testunit.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="324" Column="37" TopLine="318"/> <Caret Line="119" Column="76" TopLine="107"/>
</Position25> </Position25>
<Position26> <Position26>
<Filename Value="colourhistory.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="99" Column="49" TopLine="82"/> <Caret Line="98" Column="14" TopLine="84"/>
</Position26> </Position26>
<Position27> <Position27>
<Filename Value="testunit.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="979" Column="62" TopLine="960"/> <Caret Line="97" Column="14" TopLine="84"/>
</Position27> </Position27>
<Position28> <Position28>
<Filename Value="testunit.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="821" Column="31" TopLine="810"/> <Caret Line="94" Column="47" TopLine="84"/>
</Position28> </Position28>
<Position29> <Position29>
<Filename Value="colourhistory.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="90" Column="43" TopLine="83"/> <Caret Line="97" Column="58" TopLine="86"/>
</Position29> </Position29>
<Position30> <Position30>
<Filename Value="testunit.pas"/> <Filename Value="colourhistory.pas"/>
<Caret Line="823" Column="51" TopLine="807"/> <Caret Line="96" Column="58" TopLine="86"/>
</Position30> </Position30>
</JumpHistory> </JumpHistory>
</ProjectOptions> </ProjectOptions>