untitled.m

可以直接用

% 保存为 imaq_cyc.m
%读取任一文件，识别其文件名、后缀名、所在路径
[filename, pathname, filterindex] = uiputfile( ...
       {'*.jpg;*.bmp;*.tif;*.png', 'All PHOTO Files (*.jpg;*.bmp;*.tif;*.png)';
        '*.jpg','jpg-files (*.jpg)'; ...
        '*.bmp','bmp-files (*.bmp)'; ...
        '*.tif','tif-files (*.tif)'; ...
        '*.png','png-files (*.png)'; ...
        '*.*',  'All Files (*.*)'}, ...
        'Save as');
 
if isequal(filename,0) || isequal(pathname,0)
   h=msgbox('你按下了取消键！');,%'Title','custom',hot(64)
    else
%确定存盘时的主文件名、后缀名
filelen=length(filename);
for k=1:filelen;
if filename(k)=='.';
dotnum=k;
end;
k=k+1;
end;
insuffix= filename(dotnum:end);
infname=filename(1:dotnum-1);
%确定存盘时的主文件名、后缀名
end

%%%%%%%%%%%%%%循环采集、保存图像
% vid=videoinput('winvideo');
% imaqnum=10; %采集帧数
% for k=1:imaqnum;
% start(vid);
% aqdata1=getdata(vid,1);
% %先保存、再显示
% fullpath=[pathname,infname,num2str(k),insuffix]; %保存路径
% imwrite(aqdata1,fullpath);  %不知道此处为何不能带上'Quality'参数
% imshow(aqdata1);
% % pause(2); %采集频率2s/次
% k=k+1;
% end
%%%%%%%%%%%%%%循环采集、保存图像
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%