Using a slider to control a video while it's playing?

12 次查看（过去 30 天）
Safa Bakhshi
Safa Bakhshi 2017-3-15
评论： laurent jalabert 2022-12-22
I have to create a video player with audio playback in MATLAB 2016b that displays video on an axes. I used GUIDE to create a GUI. I have to take the approach where the video plays back through a while loop in the play button callback function. The conditions for this while loop are that the video has frames left to play back and that the UserData in Play button reads 'Play'. Here is the code for playback. vid is the video object.
while hasFrame(vid) && strcmp(get(handles.play_button,'UserData'),'Play')
% starts timing the process it takes to render a frame
tic
% sets the value of the slider to the current time of the time of the code to have it update position as the
% video plays. The min and max of the slider were set prior to this loop
handles.slider1.Value = vid.CurrentTime;
% reads the next frame of the video and stores it to frame
frame = readFrame(vid);
% standard process to correct for audio overrun. If the audio is ahead of the video keep advancing the video by
% a frame
while(((r.CurrentSample/r.SampleRate)- vid.CurrentTime) >= (1/vid.FrameRate))
frame = readFrame(vid);
end
% displays frame on the axes
image(frame,'Parent',handles.axes1);
% stop timing the rendering process and store the time to a variable
delta = toc;
% Process to correct for audio underrun. If the audio is behind the video pause the video by the difference
% let the audio catch up. Otherwise pause for (1/FrameRate - delta) to display the video at the proper framerate
if ((vid.CurrentTime - (r.CurrentSample/r.SampleRate)) >= (1/vid.FrameRate)) && r.isplaying
pause(vid.CurrentTime - (r.CurrentSample/r.SampleRate));
else
pause((1/vid.FrameRate)-delta);
end
end
The playback by itself works very well. It's when I try to change it's position with the slider is where I run into trouble. The slider needs to pause the video and change the position to the time selected. The slider should work whether the video is currently playing or paused.
Here is my callback function for slider movement. r is the audioplayer and vid is the video object.
global r;
vid = handles.vid;
guidata(hObject,handles);
set(handles.slider1,'Min',0);
set(handles.slider1,'Max',vid.Duration);
%Stops the video playback loop and set the button string to play
set(handles.play_button,'UserData','Pause');
set(handles.play_button,'String','Play');
%Pause the audio player
pause(r);
% get the value of the slider
h = get(hObject,'Value');
if h == 0
vid.CurrentTime = 0;
frame = readFrame(vid);
image(frame,'Parent',handles.axes1);
vid.CurrentTime = 0;
elseif h == get(hObject,'Max')
vid.CurrentTime = (vid.Duration-1);
frame = readFrame(vid);
image(frame,'Parent',handles.axes1);
vid.CurrentTime = (vid.Duration-1);
else
vid.CurrentTime = h;
frame = readFrame(vid);
image(frame,'Parent',handles.axes1);
end
This code basically pauses the audio and video and retrieves the position of the slider. It then checks if the video is at the beginning or end. If it is at the beginning it renders the first frame and sets the current time to 0. If it is at the end, it renders the frame a second before and set the current time to second before (I want this behavior).
Otherwise, the current time should be set to the value of the slider and the next frame rendered. This entire process works perfectly fine when moving the slider while the video is paused. However, I have an issue when moving the slider during playback where the slider is not moving to where the user places it and the video is not advancing to where the user sets the slider. Through experimentation I have determined that the code in the play back loop keeps overwriting the current value of the slider with the current time of the video. Therefore I can't get the value of the position the user places the slider. I have tried creating a global variable and an if statement that ignores the slider update command in the playback loop if that variable is set to 1. This did not work. Any advice on approaching this issue?
Thank you for your time.

请先登录，再回答此问题。

回答（1 个）

Afiq Azaibi
Afiq Azaibi 2017-3-24
It seems that moving the slider while pausing functions fine so what you can do is add two listeners to your slider. The preset will pause the video and the postset will resume its play once the value has been set. You can refer to the following code and documentation for further implementation:
PreCallBack = @(~,~) disp('Pause the video here');
PostCallBack = @(~,~)disp('Play the video here');
F = figure();
H = uicontrol(F,'Style','slider','Position',[81,54,200,23]);
addlistener(H, 'Value', 'PostSet',PostCallBack);
addlistener(H, 'Value', 'PreSet', PreCallBack);
https://www.mathworks.com/help/matlab/ref/handle.addlistener.html
  1 个评论
laurent jalabert
laurent jalabert 2022-12-22
PreCallBack = @(~,~) disp('Pause the video here');
PostCallBack = @(~,~)disp('Play the video here');
%F = figure();
F = implay(movieFullFileName)
H = uicontrol(F,'Style','slider','Position',[81,54,200,23]);
addlistener(H, 'Value', 'PostSet',PostCallBack);
addlistener(H, 'Value', 'PreSet', PreCallBack);
The program is generating an error when replacing the figure by implay a video.
How to solve this problem and add this slider to a video display ?
F =
UnifiedScope with properties:
InstanceNumber: 1
Specification: [1×1 iptscopes.IMPlayScopeCfg]
MessageLog: []
Visual: [1×1 iptscopes.VideoVisual]
DataSource: [1×1 matlabshared.scopes.source.FileSource]
Parent: [1×1 Figure]
Error using uicontrol
UnifiedScope cannot be a parent.

请先登录，再进行评论。

类别

在 Help Center 和 File Exchange 中查找有关 Audio and Video Data 的更多信息

标签

产品

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by