Matlab - Gui Matlab 2018

function Siguiente_pagina_Callback(hObject, eventdata, handles)

axes(handles.axes1)

global imagen

global nombre

k=1;

while k<3

    k=k+1;

    archivo = ['Explicación_page-000' num2str(k) '.jpg']

    imagen=imread(strcat(nombre,archivo));

    image(imagen), axis off, hold on

end

function Siguiente_pagina_Callback(hObject, eventdata, handles)

dat=get(hObject,'UserData');

if isempty(dat)

    dat=1;

    set(hObject,'UserData',dat)

else

    dat=dat+1;

    set(hObject,'UserData',dat)

end

axes(handles.axes1)

global imagen

global nombre

archivo = ['Explicación_page-000' num2str(dat) '.jpg']

imagen=imread(strcat(nombre,archivo));

image(imagen), axis off, hold on

function Siguiente_pagina_Callback(hObject, eventdata, handles)

axes(handles.axes1)

global imagen

global nombre

k=1;

while k<3

k=k+1;

archivo = ['Explicación_page-000' num2str(k) '.jpg']

imagen=imread(strcat(nombre,archivo));

image(imagen), axis off, hold on

pause(2)

end

dat=get(hObject,'UserData');

handles.counter = 0;

handles.counter = handles.counter+1;

if isempty(dat)

    dat=1;

    set(hObject,'UserData',dat)

else

    dat=dat+handles.counter;

    set(hObject,'UserData',dat)

end

axes(handles.axes1)

global nombre

archivo = ['Explicación_page-00' num2str(dat) '.jpg']

imagen=imread(strcat(nombre,archivo));

image(imagen), axis off, hold on

guidata(hObject, handles);

function varargout = ppt_caballero(varargin)

gui_Singleton = 1;

gui_State = struct('gui_Name',       mfilename, ...

                   'gui_Singleton',  gui_Singleton, ...

                   'gui_OpeningFcn', @ppt_caballero_OpeningFcn, ...

                   'gui_OutputFcn',  @ppt_caballero_OutputFcn, ...

                   'gui_LayoutFcn',  [] , ...

                   'gui_Callback',   []);

if nargin && ischar(varargin{1})

    gui_State.gui_Callback = str2func(varargin{1});

end

if nargout

    [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});

else

    gui_mainfcn(gui_State, varargin{:});

end

function ppt_caballero_OpeningFcn(hObject, eventdata, handles, varargin)

global cont

cont=0;

set(handles.axes1,'xtick',[ ])

set(handles.axes1,'ytick',[ ])

ruta=pwd;

handles.nombre=[ruta,'\imagenes'];

handles.output = hObject;

guidata(hObject, handles);

function varargout = ppt_caballero_OutputFcn(hObject, eventdata, handles)

varargout{1} = handles.output;

function siguiente_Callback(hObject, eventdata, handles)

global cont

if cont<length(dir(handles.nombre))

    cont=cont+1;

    imagen=imread(fullfile(handles.nombre,['ppt' num2str(cont) '.jpg']));

    axes(handles.axes1)

    imshow(imagen)

end

function anterior_Callback(hObject, eventdata, handles)

global cont

if cont>=2

    cont=cont- 1;

    imagen=imread(fullfile(handles.nombre,['ppt' num2str(cont) '.jpg']));

    axes(handles.axes1)

    imshow(imagen)

end