MATLAB GUI编程中几个有用的程序段

 

1、   启动

% 获取当前文件所在路径

currPath = fileparts(mfilename('fullpath'));

% 切换工作路径到当前位置

cd(currPath);

% 判断所用操作系统

if computer == 'PCWIN'

     % MATLAB版本号

     v = version;

     if v(1)~='7'        

         warndlg ('Only run in matlab 7.x(R14.x)');

         return

else

         % 添加当前路径下的所有子目录

         addpath(genpath(pwd));

         addpath(genpath(currPath));

     end

end

2、   在GUI中使用Axes控件

% 1.删除所有画线及对应图例

% 查找Axes控件中的画线

sameLines = findobj('type','line');

% 逐一删除这些画线

     for i = 1 :length(sameLines)

         delete(sameLines(i))

end

% 获取Axes控件中的图例（由于画线全部被删除，因此为空）

lgStr = get(legend(handles.ResultsAxes), 'String');

% 重新设置图例（为空）

     legend(handles.ResultsAxes,lgStr);

% 2.添加画线

% 获取原来的图例

lgStr = get(handles.hLegend, 'String');

% 设置下一个画线为添加方式

set(handles.ResultsAxes, 'Nextplot', 'add');

% 指定要画线的Axes

axes(handles.ResultsAxes);

% 画线

plot(distance_target, '-r')

% 添加图例

handles.hLegend = legend(handles.ResultsAxes, lgStr,'目标距离');

% 3.删除某一画线

% 所删除画线对应的数据为distance_target，获取它的句柄

sameLines = findobj('type','line','YData', distance_target);

% 删除画线

     if ~isempty(sameLines)

         delete(sameLines);

end

% 获取原有的图例

lgStr = get(legend(handles.ResultsAxes), 'String');                    

% 从原有图例中删除对应图例

     legend(handles.ResultsAxes, setdiff(lgStr, {'目标距离'}));

3、   在GUI中使用Excel表格（Activex控件Microsoft Office Spreedsheet）

% 获取现在使用的spreedsheet的句柄

ActiveSheet = get(handles.activex1,'ActiveSheet');

   % 现在使用的spreedsheet的现在使用工作薄

   ActiveWorkbook = get(handles.activex1,'ActiveWorkbook');            

   % 现在使用的表

eSheets = handles.activex1.ActiveWorkbook.Sheets;

   % 使用表的第一个子表

   eSheet1 = eSheets.get('Item', 1);

   % 激活该表

   eSheet1.Activate;

% 获取当前单元格的句柄

ActiveCell = get(handles.activex1, 'ActiveCell');

% 选择坐标为A1的单元格

Select(Range(ActiveSheet,'A1'));

% 获取当前单元格的句柄

ActiveCell = get(handles.activex1, 'ActiveCell');

% 设置当前单元格中的内容

     set(ActiveCell, 'Value', '仿真结果报告');  

4、   为Axes控件设置图片

% 所有设置的Axes控件

axes(handles.MyLog);

% 读取图片数据

Image_tip1=imread('Setting/mylog.jpg');

% 显示图片

image(Image_tip1);