1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49
| {
function slider_g
ant = 0;
valeur = 0;
fig = figure('Position',[250 250 350 350]);
sli = uicontrol(fig, ...
'Style','slider',...
'Max',100, ...
'Min',0, ...
'value',0,...
'SliderStep',[0.01 0],...
'Position',[125 150 150 15],...
'Callback',@sli_callback,...
'userdata',ant,...
'tag','sli');
edi = uicontrol(fig, ...
'Style','edit',...
'String',num2str(get(sli,'value')),...
'Position',[30 175 240 20],...
'Callback',@edi_callback,...
'tag','edi');
edt = uicontrol(fig, ...
'Style','text',...
'String','Nombre de courbes désirées',...
'Position',[30 215 240 20]);
function sli_callback(hObject,eventdata)
edi=findobj('tag','edi');
valeur = get(hObject,'value');
set(hObject,'userdata',valeur);
set(edi,'String',num2str(valeur));
function edi_callback(hObject,eventdata)
sli=findobj('tag','sli');
valeur = str2double(get(hObject,'String'))
if isnumeric(valeur)
if valeur>=get(sli,'min') & valeur<=get(sli,'max')
set(sli,'value',valeur);
set(sli,'userdata',valeur);
end
end
} |