aboutsummaryrefslogtreecommitdiffstats
path: root/VideoPreview/src/screens/UScreenSong.pas
diff options
context:
space:
mode:
Diffstat (limited to 'VideoPreview/src/screens/UScreenSong.pas')
-rw-r--r--VideoPreview/src/screens/UScreenSong.pas3
1 files changed, 3 insertions, 0 deletions
diff --git a/VideoPreview/src/screens/UScreenSong.pas b/VideoPreview/src/screens/UScreenSong.pas
index 1171eaa9..764a0d47 100644
--- a/VideoPreview/src/screens/UScreenSong.pas
+++ b/VideoPreview/src/screens/UScreenSong.pas
@@ -1574,6 +1574,7 @@ begin
// stop preview
StopMusicPreview();
+ StopVideoPreview();
end;
procedure TScreenSong.DrawExtensions;
@@ -1887,8 +1888,10 @@ end;
procedure TScreenSong.ChangeMusic;
begin
StopMusicPreview();
+ StopVideoPreview();
PreviewOpened := -1;
StartMusicPreview();
+ StartVideoPreview();
end;
procedure TScreenSong.SkipTo(Target: cardinal);