Ignore:
Timestamp:
Aug 21, 2009 12:07:05 PM (13 years ago)
Author:
srkline
Message:

sample aperture popup now properly updates the displayed empty cell data

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/Dev/trunk/NCNR_User_Procedures/Reduction/USANS/U_CALC.ipf

    r549 r550  
    303303        PopupMenu popup0,pos={17,19},size={165,20},title="Sample Aperture Diam (in)" 
    304304        PopupMenu popup0,mode=3,popvalue="0.625",value="0.25;0.50;0.625;0.75;1.0;1.75;2.0;" 
     305        PopupMenu popup0,proc=UCALC_SampleAperturePopup 
    305306        PopupMenu popup2,pos={220,19},size={165,20},title="Presets" 
    306307        PopupMenu popup2,mode=3,popvalue="Long Count",value="Short Count;Medium Count;Long Count;" 
     
    12071208End          
    12081209 
    1209  
    1210 //Function Sim_USANS_SamplAperPopMenuProc(pa) : PopupMenuControl 
    1211 //      STRUCT WMPopupAction &pa 
    1212 // 
    1213 //      switch( pa.eventCode ) 
    1214 //              case 2: // mouse up 
    1215 //                      Variable popNum = pa.popNum 
    1216 //                      String popStr = pa.popStr 
    1217 // 
    1218 //                      Variable diam=str2num(popStr) 
    1219 //                       
    1220 //                       
    1221 //                      break 
    1222 //      endswitch 
    1223 // 
    1224 //      return 0 
    1225 //End   
     1210// if the sample aperture is changed, AND the empty data is displayed, change to the proper data 
     1211Function UCALC_SampleAperturePopup(pa) : PopupMenuControl 
     1212        STRUCT WMPopupAction &pa 
     1213 
     1214        switch( pa.eventCode ) 
     1215                case 2: // mouse up 
     1216                        Variable popNum = pa.popNum 
     1217                        String popStr = pa.popStr 
     1218 
     1219                        ControlInfo/W=UCALC check0_4 
     1220                        if(V_Value==1)          //currently checked, need to update 
     1221                                 
     1222                                STRUCT WMCheckboxAction cba 
     1223                                cba.checked=0           //"un-check" 
     1224                                cba.eventCode=2 
     1225                                ShowEMPCheckProc(cba) 
     1226                                 
     1227                                cba.checked=1           //"re-check" 
     1228                                ShowEMPCheckProc(cba) 
     1229                         
     1230                        endif 
     1231                        break 
     1232                         
     1233        endswitch 
     1234         
     1235        return 0 
     1236End   
    12261237 
    12271238 
Note: See TracChangeset for help on using the changeset viewer.