Changeset 12 for trunk/src/get_field.m

Timestamp:

Feb 16, 2010, 3:19:38 PM (14 years ago)

Author:

gostiaux

Message:

The files from uvmat.2.2.beta that differed from the current version have been updated.
Now the /raid/soft/UVMAT/src should be operational

File:

• trunk/src/get_field.m (modified) (10 diffs)

trunk/src/get_field.m

@@ -22 +22 @@
 function varargout = get_field(varargin)
 
-% Last Modified by GUIDE v2.5 08-Jan-2010 15:15:06
+% Last Modified by GUIDE v2.5 06-Feb-2010 09:58:13
 
 % Begin initialization code - DO NOT EDIT
@@ -56 +56 @@
 guidata(hObject, handles);
 pathuvmat=fileparts(which('uvmat'));
-% addpath(fullfile(pathuvmat,'FIELD_FCT'))
+addpath(fullfile(pathuvmat,'FIELD_FCT'))
 set(handles.attributes,'enable','on')% TO BE SET BY GUIDE
 set(hObject,'WindowButtonUpFcn',{@mouse_up_gui,handles})%set mouse click action function
@@ -113 +113 @@
 
 
-
-
-
-
 %-----------------------------------------------------------
 % --- Outputs from this function are returned to the command line.
@@ -125 +121 @@
 % --- Executes on button press in browse.
 function browse_Callback(hObject, eventdata, handles)
-
-
 
 
@@ -768 +762 @@
 end
 haxes=findobj(hfig,'Type','axes');
-
 plot_field(SubField,haxes) 
 end
@@ -1484 +1477 @@
 list_path=get(handles.ACTION,'UserData');
 nb_builtin=0;
-list_path
 if iscell(list_path)
-for ilist=1:length(list_path)
-    if isequal(list_path{ilist},path_get_field)
-        nb_builtin=nb_builtin+1;
-    else
-        break
-    end
-end
+    for ilist=1:length(list_path)
+        if isequal(list_path{ilist},path_get_field)
+            nb_builtin=nb_builtin+1;
+        else
+            break
+        end
+    end
 end
 if nb_builtin==0% the path to get_field has been changed, reinitialize
@@ -1652 +1644 @@
 %default setting for the visibility of the GUI elements*
 if ~isequal(ACTION,'PLOT')
-    varargout=feval(ACTION);% input list asked by the selected function
+    varargout=feval(ACTION)% input list asked by the selected function
     test_1Dplot=[];
     test_scalar=[];
     test_vector=[];
-    for ilist=1:length(varargout)-1
-        switch varargout{ilist}
+    for ilist=1:length(varargout)
+        switch varargout{ilist,1}
                            %RootFile always visible
             case 'check_1Dplot'   
-                 test_1Dplot=isequal(lower(varargout{ilist+1}),'y');
+                 test_1Dplot=isequal(lower(varargout{ilist,2}),'y')
             case 'check_scalar'
-                 test_scalar=isequal(lower(varargout{ilist+1}),'y');    
+                 test_scalar=isequal(lower(varargout{ilist,2}),'y')    
             case 'check_vector'   
-                 test_vector=isequal(lower(varargout{ilist+1}),'y'); 
+                 test_vector=isequal(lower(varargout{ilist,2}),'y') 
         end
     end
@@ -1725 +1717 @@
 % end
 
-% --- Executes on selection change in menu_coord.
-function HELP_Callback(hObject, eventdata, handles)
-path_to_uvmat=which ('uvmat');% check the path of uvmat
-pathelp=fileparts(path_to_uvmat);
-helpfile=fullfile(pathelp,'UVMAT_DOC','uvmat_doc.html');
-if isempty(dir(helpfile)), errordlg('Please put the help file uvmat_doc.html in the directory UVMAT/UVMAT_DOC')
-else
-web([helpfile '#get_field'])    
-end
+
 
 %-----------------------------------------------------
@@ -1883 +1867 @@
 testblank=findstr(fileinput,' ');%look for blanks
 if ~isempty(testblank)
-    warndlg_uvmat(['The input file name ' fileinput ' contains blank character : This is not allowed. Please change name'],'ERROR')
+    msgbox_uvmat('ERROR',['The input file name ' fileinput ' contains blank character : This is not allowed. Please change name'])
     return
 end
@@ -1917 +1901 @@
 % --------------------------------------------------------------------
 function MenuFile_1_Callback(hObject, eventdata, handles)
-% hObject    handle to MenuFile_1 (see GCBO)
+fileinput=get(handles.MenuFile_1,'Label');
+set(handles.inputfile,'String',fileinput)
+inputfile_Callback(hObject, eventdata, handles)
+
+% --------------------------------------------------------------------
+function MenuFile_2_Callback(hObject, eventdata, handles)
+fileinput=get(handles.MenuFile_2,'Label');
+set(handles.inputfile,'String',fileinput)
+inputfile_Callback(hObject, eventdata, handles)
+
+% --------------------------------------------------------------------
+function MenuFile_3_Callback(hObject, eventdata, handles)
+fileinput=get(handles.MenuFile_3,'Label');
+set(handles.inputfile,'String',fileinput)
+inputfile_Callback(hObject, eventdata, handles)
+
+% --------------------------------------------------------------------
+function MenuFile_4_Callback(hObject, eventdata, handles)
+fileinput=get(handles.MenuFile_4,'Label');
+set(handles.inputfile,'String',fileinput)
+inputfile_Callback(hObject, eventdata, handles)
+
+% --------------------------------------------------------------------
+function MenuFile_5_Callback(hObject, eventdata, handles)
+fileinput=get(handles.MenuFile_5,'Label');
+set(handles.inputfile,'String',fileinput)
+inputfile_Callback(hObject, eventdata, handles)
+
+% --------------------------------------------------------------------
+function MenuExportField_Callback(hObject, eventdata, handles)
+
+
+% --------------------------------------------------------------------
+function MenuHelp_Callback(hObject, eventdata, handles)
+% hObject    handle to MenuHelp (see GCBO)
 % eventdata  reserved - to be defined in a future version of MATLAB
 % handles    structure with handles and user data (see GUIDATA)
-
-
-% --------------------------------------------------------------------
-function MenuFile_2_Callback(hObject, eventdata, handles)
-% hObject    handle to MenuFile_2 (see GCBO)
-% eventdata  reserved - to be defined in a future version of MATLAB
-% handles    structure with handles and user data (see GUIDATA)
-
-
-% --------------------------------------------------------------------
-function MenuFile_3_Callback(hObject, eventdata, handles)
-% hObject    handle to MenuFile_3 (see GCBO)
-% eventdata  reserved - to be defined in a future version of MATLAB
-% handles    structure with handles and user data (see GUIDATA)
-
-
-% --------------------------------------------------------------------
-function MenuFile_4_Callback(hObject, eventdata, handles)
-% hObject    handle to MenuFile_4 (see GCBO)
-% eventdata  reserved - to be defined in a future version of MATLAB
-% handles    structure with handles and user data (see GUIDATA)
-
-
-% --------------------------------------------------------------------
-function MenuFile_5_Callback(hObject, eventdata, handles)
-% hObject    handle to MenuFile_5 (see GCBO)
-% eventdata  reserved - to be defined in a future version of MATLAB
-% handles    structure with handles and user data (see GUIDATA)
-
-
-% --------------------------------------------------------------------
-function ExportField_Callback(hObject, eventdata, handles)
-% hObject    handle to ExportField (see GCBO)
-% eventdata  reserved - to be defined in a future version of MATLAB
-% handles    structure with handles and user data (see GUIDATA)
+path_to_uvmat=which ('uvmat');% check the path of uvmat
+pathelp=fileparts(path_to_uvmat);
+helpfile=fullfile(pathelp,'UVMAT_DOC','uvmat_doc.html');
+if isempty(dir(helpfile)), msgbox_uvmat('ERROR','Please put the help file uvmat_doc.html in the directory UVMAT/UVMAT_DOC')
+else
+web([helpfile '#get_field'])    
+end
+