Changeset 624 for trunk/src/series/civ_input.m

Timestamp:

Apr 29, 2013, 11:28:23 PM (11 years ago)

Author:

sommeria

Message:

waitbar system for series improved to aloow use as stand alone fcts.

to add at the head of series fcts:
hseries=findobj(allchild(0),'Tag','series');
RUNHandle=findobj(hseries,'Tag','RUN');%handle of RUN button in GUI series
WaitbarHandle?=findobj(hseries,'Tag','Waitbar');%handle of waitbar in GUI series

call to waitbar:

update_waitbar(WaitbarHandle?,index/nbfield)
if ishandle(RUNHandle) && ~strcmp(get(RUNHandle,'BusyAction?'),'queue')

disp('program stopped by user')
break

end

File:

• trunk/src/series/civ_input.m (modified) (1 diff)

trunk/src/series/civ_input.m

@@ -195 +195 @@
 %check_letter=~isempty(regexp(NomTypeIma,'[ab|AB]$'));%detect pair label by letter
 %if  isequal(NomTypeNc,'_1-2')||isempty(MaxIndex_j)|| (MaxIndex_j==1)
-MaxIndex_i=Param.IndexRange.MaxIndex{1};
-MaxIndex_j=Param.IndexRange.MaxIndex{1,2};
-MinIndex_i=Param.IndexRange.MinIndex{1};
-MinIndex_j=Param.IndexRange.MinIndex{1,2};
+MaxIndex_i=Param.IndexRange.MaxIndex_i{1};
+MaxIndex_j=Param.IndexRange.MaxIndex_j{1};
+MinIndex_i=Param.IndexRange.MinIndex_i{1};
+MinIndex_j=Param.IndexRange.MinIndex_j{1};
 if ~isfield(Param.IndexRange,'first_j')
     set(handles.ListPairMode,'Value',1)