paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 14:29:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix crash in libvlc packages by patch from Michl, resolves #31541

Browse Source 
git-svn-id: trunk@38308 -
This commit is contained in:
florian 2018-02-21 20:25:57 +00:00
parent d16a22e42b
commit f969e43ff0
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/libvlc/src/vlc.pp
View File

@ -687,7 +687,8 @@ end;
procedure TCustomVLCMediaPlayer.SetAudioMuted(AValue: Boolean); procedure TCustomVLCMediaPlayer.SetAudioMuted(AValue: Boolean);
begin begin
libvlc_audio_set_mute(instance, ord(AValue)); if Assigned(FInstance) then
libvlc_audio_set_mute(instance, ord(AValue));
end; end;
procedure TCustomVLCMediaPlayer.SetFitWindow(AValue: Boolean); procedure TCustomVLCMediaPlayer.SetFitWindow(AValue: Boolean);