From f4ad1508668546d5ea1a88f45bca799de239b995 Mon Sep 17 00:00:00 2001 From: Wizzup? Date: Sat, 19 Dec 2009 23:45:57 +0000 Subject: [PATCH] Small fix. git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@297 3f818213-9676-44b0-a9b4-5e4c4e03d09d --- Projects/SAMufasaGUI/colourhistory.pas | 3 + Projects/SAMufasaGUI/project1.lpi | 98 +++++++++++++------------- 2 files changed, 52 insertions(+), 49 deletions(-) diff --git a/Projects/SAMufasaGUI/colourhistory.pas b/Projects/SAMufasaGUI/colourhistory.pas index 29214bf..b7d4826 100644 --- a/Projects/SAMufasaGUI/colourhistory.pas +++ b/Projects/SAMufasaGUI/colourhistory.pas @@ -103,6 +103,8 @@ begin bmp.Canvas.Rectangle(0,0,16,16); it.ImageIndex:= CHImages.Add(bmp,nil); + it.SelectedIndex:=it.ImageIndex; + bmp.Free; end; @@ -118,6 +120,7 @@ begin TColourPickerObject(ColourTree.Selected.Data).Free; i:=ColourTree.Selected.ImageIndex; ColourTree.Selected.ImageIndex:=0; + ColourTree.Selected.SelectedIndex:=-0; CHImages.Delete(i); ColourTree.Selected.Delete; diff --git a/Projects/SAMufasaGUI/project1.lpi b/Projects/SAMufasaGUI/project1.lpi index 93ab813..b39304a 100644 --- a/Projects/SAMufasaGUI/project1.lpi +++ b/Projects/SAMufasaGUI/project1.lpi @@ -1006,7 +1006,7 @@ - + @@ -1205,7 +1205,7 @@ - + @@ -1517,10 +1517,10 @@ - - + + - + @@ -1771,7 +1771,7 @@ - + @@ -1785,7 +1785,7 @@ - + @@ -1794,7 +1794,7 @@ - + @@ -1805,7 +1805,7 @@ - + @@ -1920,119 +1920,119 @@ - + - - - - - - - - - - + + - - + + - - + + - - + + - - + + - - + + + + + + + + + + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - + - +