弹出窗口选择单个文件

Halcom

1. clc,clear,close all                    % 清屏、清工作区、关闭窗口
   
2. warning off                         % 消除警告
   
3. feature jit off                        % 加速代码执行
   
4. [filename ,pathname]=...
   
5.     uigetfile({'*.bmp';'*.jpg';},'选择图片');                 %选择图片路径
   
6. str = [pathname filename];                                        %合成路径+文件名
   
7. I = imread(str);%读图
   
8. obj=I;
   
9. r=obj(:,:,1);g=obj(:,:,2);b=obj(:,:,3);
   
10. % 转化为灰度图像
    
11. if size(I,3)==1
    
12.     im = I;
    
13. else
    
14.     im = rgb2gray(I);
    
15. end
    
16. [G,gabout] = gaborfilter(im,0.5,0.5,1,1);
    
17. figure,
    
18. subplot(121),imshow(g);title('灰度图像');
    
19. subplot(122),imshow(gabout,[]);title('Gagor滤波图像')

复制代码