save1.m

来自「This software gave volume MoM solution b」· M 代码 · 共 20 行

% save1

figure(1);

   Frame2=uicontrol(gcf,...
   'Style','frame',...
   'Position',[15 140 450 140]);
   txt_tdir1=uicontrol(gcf,...  
   'Style','text',...
   'String',['Enter File Name to save (without .mat): '],...
   'Position',[40 230 250 20]);
   FN=uicontrol(gcf,'Style','edit', ...
   'String','CG', ...
   'Position',[ 300 230 140 20],'CallBack','save2');
   pb_OK =uicontrol(gcf,...
   'Style','push',...
   'String','Cancel','Position',[80 150 90 25],...
   'CallBack','set(Frame2,''visible'',''off''); set(txt_tdir1,''visible'',''off''); set(FN,''visible'',''off''); set(pb_OK,''visible'',''off'');');