how to use button that controls video?

hello~may I help you?

this is my code

obj = mmreader('watch.avi');
vid = read(obj);
for frame = 1 : size(vid,4)
   % bw = im2bw(vid(:,:,:,frame));
    subplot(2,2,1); imshow(vid(:,:,:,frame));
    subplot(2,2,2); imshow(vid(:,:,:,frame));
    subplot(2,2,3); imshow(vid(:,:,:,frame));
    subplot(2,2,4); imshow(vid(:,:,:,frame));
    drawnow;    
end

I want to use button that can "play"and "stop" and"close"

h4 = uicontrol('Style','PushButton','Units','normalized',...
  'String','play','Position',[.05 .05 .1 .1]);

controlling all video.

Answer 1

[Chandra Kurniawan]

function vidplayer()
obj = mmreader('rhinos.avi');
v = read(obj);
hstat = uicontrol('unit','pixel','style','checkbox','value',0,'position',...
            [160 10 25 25]);
hplay = uicontrol('unit','pixel','style','pushbutton','string','PLAY',...
            'position',[10 10 50 25],'callback',{@play_callback,v});
hstop = uicontrol('unit','pixel','style','pushbutton','string','STOP',...
            'position',[60 10 50 25],'callback',@stop_callback);
hexit = uicontrol('unit','pixel','style','pushbutton','string','EXIT',...
            'position',[110 10 50 25],'callback',@exit_callback);

function play_callback(hObject,eventdata,vid)
    set(hstat,'value',1);    
    for frame = 1 : size(vid,4)   
        if get(hstat,'value') == 1,
            subplot(2,2,1); imshow(vid(:,:,:,frame));
            subplot(2,2,2); imshow(vid(:,:,:,frame));
            subplot(2,2,3); imshow(vid(:,:,:,frame));
            subplot(2,2,4); imshow(vid(:,:,:,frame));
            drawnow;    
        else, break; end
    end    
end
function stop_callback(hObject,eventdata)
    set(hstat,'value',0);
end
function exit_callback(hObject,eventdata)
    stop_callback;
    close gcf;
end
end

Answer 2

[Pan]

Thank you ^_^