Changeset 153 for trunk/src/set_object.m
- Timestamp:
- Dec 9, 2010, 11:31:04 PM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/set_object.m
r150 r153 56 56 end 57 57 % End initialization code - DO NOT PLOT 58 59 %------------------------------------------------------------------- 58 %------------------------------------------------------------------------ 59 %------------------------------------------------------------------------ 60 60 % --- Executes just before set_object is made visible. 61 61 %INPUT: … … 275 275 varargout{2}=handles; 276 276 277 %----------------------------------------------- 277 %------------------------------------------------------------------------ 278 278 % --- Executes on selection change in ObjectStyle. 279 279 function ObjectStyle_Callback(hObject, eventdata, handles) … … 350 350 set(handles.ObjectStyle,'UserData',style) 351 351 352 %---------------------------------------------- 352 %------------------------------------------------------------------------ 353 353 function xObject_Callback(hObject, eventdata, handles) 354 354 355 355 %------------------------------------------------------------------------ 356 356 function yObject_Callback(hObject, eventdata, handles) 357 357 358 358 %------------------------------------------------------------------------ 359 359 % --- Executes on selection change in zObject. 360 360 function zObject_Callback(hObject, eventdata, handles) 361 362 363 361 %------------------------------------------------------------------------ 362 363 %------------------------------------------------------------------------ 364 364 % --- Executes on selection change in ProjMode. 365 365 function ProjMode_Callback(hObject, eventdata, handles) … … 464 464 end 465 465 end 466 % 467 % %--------------------------------------------- 468 % % --- Executes on selection change in TITLE. 469 % function TITLE_Callback(style, handles) 470 % %--------------------------------------------- 471 % switch style 472 % case {'points','line','polyline','plane'} 473 % menu_proj={'projection';'interp';'filter';'none'}; 474 % case {'polygon','rectangle','ellipse'} 475 % menu_proj={'inside';'outside';'mask_inside';'mask_outside'}; 476 % case 'volume' 477 % menu_proj={'none'}; 478 % end 479 % 480 % 481 % old_menu=get(handles.ObjectStyle,'String'); 482 % value=get(handles.ObjectStyle,'Value'); 483 % old_style=old_menu{value}; 484 % teststyle=0; 485 % for iline=1:length(menu_style) 486 % if isequal(menu_style{iline},old_style) 487 % styleval=iline; 488 % teststyle=1; 489 % break 490 % end 491 % end 492 % if ~teststyle 493 % new_style=[];%default 494 % switch old_style 495 % case 'polyline' 496 % new_style='polygon'; 497 % case 'polygon' 498 % new_style='polyline'; 499 % end 500 % if ~isempty(new_style) 501 % for iline=1:length(menu_style) 502 % if isequal(menu_style{iline},new_style) 503 % styleval=iline; 504 % teststyle=1; 505 % break 506 % end 507 % end 508 % end 509 % end 510 % if ~teststyle 511 % styleval=1; 512 % end 513 % set(handles.ObjectStyle,'String',menu_style) 514 % set(handles.ObjectStyle,'Value',styleval) 515 % set(handles.ProjMode,'String',menu_proj) 516 % set(handles.ProjMode,'Value',1) 517 % ObjectStyle_Callback(hObject, eventdata, handles) 518 519 %--------------------------------------------- 466 %------------------------------------------------------------------------ 467 468 %------------------------------------------------------------------------ 520 469 function Phi_Callback(hObject, eventdata, handles) 521 470 update_slider(hObject, eventdata,handles) 522 %--------------------------------------------- 523 471 %------------------------------------------------------------------------ 472 %------------------------------------------------------------------------ 524 473 function Theta_Callback(hObject, eventdata, handles) 525 474 update_slider(hObject, eventdata,handles) 526 475 %------------------------------------------------------------------------ 527 476 function update_slider(hObject, eventdata,handles) 528 477 %rotation angles … … 542 491 ZMax_Callback(hObject, eventdata, handles) 543 492 end 544 493 %------------------------------------------------------------------------ 545 494 function DX_Callback(hObject, eventdata, handles) 546 547 495 %------------------------------------------------------------------------ 496 %------------------------------------------------------------------------ 548 497 function DY_Callback(hObject, eventdata, handles) 549 550 498 %------------------------------------------------------------------------ 499 %------------------------------------------------------------------------ 551 500 function DZ_Callback(hObject, eventdata, handles) 552 553 554 501 %------------------------------------------------------------------------ 502 503 %------------------------------------------------------------------------ 555 504 %----------------------------------------------------- 556 505 % --- Executes on button press in OPEN: DESACTIVATED use uvmat browser … … 740 689 set(handles.YObject,'String',YObject) 741 690 %METTRA A JOUR ASPECT DE L'INTERFACE (COMME set_object_Opening 742 691 %------------------------------------------------------------------------ 743 692 %---------------------------------------------------- 744 693 % executed when closing: set the parent interface button to value 0 … … 768 717 end 769 718 770 %----------------------------------------------------------------------- 719 %------------------------------------------------------------------------ 771 720 % --- Executes on button press in PLOT: PLOT the defined object and its projected field 772 721 function PLOT_Callback(hObject, eventdata, handles) … … 775 724 UvData=get(huvmat,'UserData');%Data associated to the GUI uvmat 776 725 hhuvmat=guidata(huvmat);%handles in the uvmat GUI 777 ObjectName=get(handles.TITLE,'String');%name o me)f the current object (set_object na726 ObjectName=get(handles.TITLE,'String');%name of the current object 778 727 ListObject=get(hhuvmat.list_object_1,'String');%position in the objet list 779 728 IndexObj_1=get(hhuvmat.list_object_1,'Value'); 780 729 IndexObj_2=get(hhuvmat.list_object_2,'Value'); 781 782 % set(plotfig,'Name',['Projection on' num2str(IndexObj) '-' ObjectData.Style]);783 730 ObjectData=read_set_object(handles);%read the input parameters defining the object in the GUI set_object 784 PlotHandles=[];%default785 731 testnew=0; 786 732 PlotHandles=get_plot_handles(hhuvmat); … … 791 737 projview='uvmat'; 792 738 elseif IndexObj_2<=numel(ListObject)&& strcmp(ListObject{IndexObj_2},ObjectName)% we are editing the object whose projection is viewed in view_field 793 hview_field=findobj( 'tag','view_field');739 hview_field=findobj(allchild(0),'tag','view_field'); 794 740 if ~isempty(hview_field) 795 741 PlotHandles=guidata(hview_field); … … 799 745 projview='view_field'; 800 746 else %new object 801 testnew=1; 802 747 testnew=1; 803 748 IndexObj=numel(ListObject)+1; 804 %ObjectName=[num2str(IndexObj) '-' ObjectData.Style]; 805 % ListObject=[ListObject;ObjectName]; 806 % set(hhuvmat.list_object_2,'String',[ListObject;ObjectName;{'...'}]) 807 % set(hhuvmat.list_object_2,'Value',IndexObj) 808 end 809 % ObjectName=get(handles.TITLE,'String'); 810 if length(ObjectName)<1 811 ObjectName=[num2str(IndexObj) '-' ObjectData.Style]; 812 else 813 for ilist=1:numel(ListObject) 814 if strcmp(ListObject{ilist},ObjectName) 815 ObjectName=[num2str(IndexObj) '-' ObjectName]; 816 break 817 end 818 end 749 end 750 if length(ObjectName)<1% name of object not defined in set_object 751 ObjectName=[num2str(IndexObj) '-' ObjectData.Style];%default name 752 elseif ~get(hhuvmat.edit,'Value')%not in edit mode (new object created) 753 detectname=1; 754 ObjectNameNew=ObjectName; 755 vers=0; 756 while detectname==1 %create a new subdir if the netcdf files already exist 757 detectname=find(strcmp(ObjectNameNew,ListObject),1)%test the existence of the proposed name in the list 758 if detectname% if athe object name already exists 759 indstr=regexp(ObjectNameNew,'\D') 760 if indstr(end)<length(ObjectNameNew) %object name ends by a number 761 vers=str2double(ObjectNameNew(indstr(end)+1:end))+1; 762 ObjectNameNew=[ObjectNameNew(1:indstr(end)) num2str(vers)]; 763 else 764 vers=vers+1 765 ObjectNameNew=[ObjectNameNew(1:indstr(end)) '_' num2str(vers)] 766 end 767 end 768 end 769 ObjectName=ObjectNameNew; 819 770 end 820 771 ListObject{IndexObj,1}=ObjectName; … … 842 793 UvData.MouseAction='edit_object'; % set the edit button to 'on' 843 794 set(huvmat,'UserData',UvData) 844 795 %------------------------------------------------------------------------ 845 796 % --- Executes on button press in MenuCoord. 846 797 function MenuCoord_Callback(hObject, eventdata, handles) 847 798 %------------------------------------------------------------------------ 848 799 %---------------------------------------------------- 849 800 function YMin_Callback(hObject, eventdata, handles) 850 801 %------------------------------------------------------------------------ 851 802 852 803 function ZMin_Callback(hObject, eventdata, handles) 853 804 %------------------------------------------------------------------------ 854 805 855 806 function ZMax_Callback(hObject, eventdata, handles) … … 862 813 set(handles.z_slider,'SliderStep',rel_step) 863 814 end 864 815 %------------------------------------------------------------------------ 865 816 function YMax_Callback(hObject, eventdata, handles) 866 817 %------------------------------------------------------------------------ 867 818 868 819 function XMin_Callback(hObject, eventdata, handles) 869 820 %------------------------------------------------------------------------ 870 821 871 822 function XMax_Callback(hObject, eventdata, handles) 872 873 874 % ------------------------------------------------------ 823 %------------------------------------------------------------------------ 824 %------------------------------------------------------------------------ 875 825 function SAVE_Callback(hObject, eventdata, handles) 876 826 % ------------------------------------------------------ … … 914 864 end 915 865 msgbox_uvmat('CONFIRMATION',[answer{1} ' saved']) 916 917 %--------------------------------------------------------- 866 %------------------------------------------------------------------------ 867 %------------------------------------------------------------------------ 918 868 % --- Executes on slider movement. 919 869 function z_slider_Callback(hObject, eventdata, handles) … … 936 886 set(handles.ZObject,'String',num2str(NormVec_Z*Z_value,4)) 937 887 PLOT_Callback(hObject, eventdata, handles) 938 939 888 %------------------------------------------------------------------------ 889 %------------------------------------------------------------------------ 940 890 % --- Executes on button press in HELP. 941 891 function HELP_Callback(hObject, eventdata, handles) … … 948 898 web([helpfile '#set_object']) 949 899 end 950 951 952 900 %------------------------------------------------------------------------ 901 902
Note: See TracChangeset
for help on using the changeset viewer.