aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-11-24 17:55:34 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-11-24 17:55:34 +0000
commitcd5c858d00c6cbc27291523e2c78d28575778c9e (patch)
treed878380ad07dd42a8ccaff23861e5fff93d0ff1d
parenta5d9ada4b5b19e774ee47f45f673233592ae6939 (diff)
downloadusdx-cd5c858d00c6cbc27291523e2c78d28575778c9e.tar.gz
usdx-cd5c858d00c6cbc27291523e2c78d28575778c9e.tar.xz
usdx-cd5c858d00c6cbc27291523e2c78d28575778c9e.zip
fixed assembla #92: all song covers look like selected ones
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1958 b956fd51-792f-4845-bead-9b4dfca2ff2c
-rw-r--r--src/screens/UScreenSong.pas10
1 files changed, 7 insertions, 3 deletions
diff --git a/src/screens/UScreenSong.pas b/src/screens/UScreenSong.pas
index a9c47401..7cfb0b0a 100644
--- a/src/screens/UScreenSong.pas
+++ b/src/screens/UScreenSong.pas
@@ -908,9 +908,6 @@ begin
Equalizer := Tms_Equalizer.Create(AudioPlayback, Theme.Song.Equalizer);
PreviewOpened := -1;
-
- if (Length(CatSongs.Song) > 0) then
- Interaction := 0;
end;
procedure TScreenSong.GenerateThumbnails();
@@ -973,10 +970,17 @@ begin
CoverTexture := Cover.GetPreviewTexture();
Texture.AddTexture(CoverTexture, TEXTURE_TYPE_PLAIN, true);
CoverButton.Texture := CoverTexture;
+
+ // set selected to false -> the right texture will be displayed
+ CoverButton.Selected := False;
end;
Cover.Free;
end;
+
+ // reset selection
+ if (Length(CatSongs.Song) > 0) then
+ Interaction := 0;
end;
procedure TScreenSong.SetScroll;