实现同时将一批.bmp文件转换成.mat格式

%% 功能：实现同时对一批.bmp文件的转换成.mat格式
PicFormat = {'*.bmp','Bitmap image (*.bmp)';...
'*.jpg','JPEG image (*.jpg)' ;...
'*.*','All Files (*.*)'};
% 利用uigetfile函数交互式选取训练样本图片
[FileName FilePath,flag] = uigetfile(PicFormat,'导入图像',...
'*.bmp','MultiSelect','on');
if ~flag
return;%flag为0，用户取消选择，返回;
end
%%
%将导入的图像样本名称用cell数组存储，因为导入一个图像时filename用char型存储，
%cellstr作用后变为filename用1*1的cell数组存储。导入多个图像时filename用cell存储，
%cellstr作用后不变
FileName = cellstr(FileName);%n*1的cell字符数组
n = length(FileName);
for k = 1:n
I = imread([FilePath,FileName{k}]); %读入一幅图片
MM(:,:,k) = I(:,:);
end
MM = uint8(MM);
save MM.mat MM

%imwrite(MM,strcat('D:\mat_file\MM','.mat','mat'));