Changeset 1102 for trunk

Timestamp:

May 8, 2021, 11:07:13 AM (4 years ago)

Author:

sommeria

Message:

introduce user defined export function for uvmat

Location:

trunk/src

Files:

• BuYlRd.mat (added)
• export_fct (added)
• export_fct/quiver_col_eletta.m (added)
• export_fct/quivercol.m (added)
• uvmat.fig (modified) (previous)
• uvmat.m (modified) (4 diffs)

trunk/src/uvmat.m

@@ -216 +216 @@
 path_list{1}='';
 for ilist=2:UvData.OpenParam.NbBuiltin
-path_list{ilist}=transform_path; % set transform_path to the path_list
-end
+    path_list{ilist}=transform_path; % set transform_path to the path_list
+end
+
+%% EXPORT menu
+export_menu={'as field in workspace';'in new figure';'on existing axis';'make movie';'more...'};
+export_path=fullfile(path_uvmat,'export_fct');
 
 %% load the list of previously browsed files in menus Open, Open_1 and TransformName
@@ -238 +242 @@
     end
     if isfield(h,'transform_fct') && iscell(h.transform_fct) % load the menu of transform fct set by user
-        for ilist=1:length(h.transform_fct);
+        for ilist=1:length(h.transform_fct)
             if exist(h.transform_fct{ilist},'file')
                 [path,file]=fileparts(h.transform_fct{ilist});
                 transform_menu=[transform_menu; {file}];
                 path_list=[path_list; {path}];
+            end
+        end
+    end
+    if isfield(h,'export_fct') && iscell(h.export_fct) % load the menu of export fct set by user
+        for ilist=1:length(h.export_fct)
+            if exist(h.export_fct{ilist},'file')
+                [path,file]=fileparts(h.export_fct{ilist});
+                export_menu=[export_menu; {file}];
             end
         end
@@ -252 +264 @@
 set(handles.TransformPath,'String','')
 set(handles.TransformPath,'UserData',[])
+export_menu=[export_menu;{'more...'}];%append the option more.. to the menu
+%set(handles.TransformName,'String',transform_menu)% display the menu of transform fcts
 
 %% case of an input argument for uvmat
@@ -877 +891 @@
 delete(hObject)
 
+% --------------------------------------------------------------------
+function MenuExportCustom_Callback(hObject, eventdata, handles)
+export_fct_name=get(handles.MenuExportCustom,'label');
+current_dir=pwd;%current working dir
+cd(fullfile(fileparts(which('uvmat')),'export_fct'))
+export_handle=str2func(export_fct_name);
+cd(current_dir)
+export_handle(handles)
+        
+% --------------------------------------------------------------------
+function MenuExportMore_Callback(hObject, eventdata, handles)
+
+prev_path=fullfile(fileparts(which('uvmat')),'export_fct');
+transform_fct_chosen=uigetfile_uvmat('Pick the export function',prev_path,'.m');
+if ~isempty(transform_fct_chosen)
+    [PathName,transform_name]=fileparts(transform_fct_chosen);
+    set(handles.MenuExportCustom,'label',transform_name)
+    set(handles.MenuExportCustom,'checked','on')
+    MenuExportCustom_Callback(hObject, eventdata, handles)
+end
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%