Code covered by the BSD License  

Highlights from
MATLAB 7 Fundamentos

image thumbnail

MATLAB 7 Fundamentos

by

 

09 Aug 2004 (Updated )

Companion Software for the book "MATLAB 7 Fundamentos"

edit_callback.m
function edit_callback( )
% Verifica se o texto  valor numrico positivo
h=gcf;  % Figura corrente
obj=findobj(h,'Tag','edit1'); % Objeto edit1
str=get(obj,'String');  % Dado digitado
valor=sscanf(str,'%f'); % Tenta obter um numero
switch valor
    case 0
        errordlg('Valor NAO pode ser ZERO');
    case ''
        errordlg('Valor NAO pode ser ALFANUMERICO');
    otherwise
        if valor < 0
            errordlg('Valor NAO pode ser MENOR QUE ZERO');
        else        
            warndlg('VALOR ACEITO!');
        end
end

Contact us