Ignore:
Timestamp:
Feb 21, 2020 1:32:52 PM (3 years ago)
Author:
srkline
Message:

VSANS: changes here are simply cleaning up comments and TODO items

SANS: added a contextual menu simialr to VSANS so that RAW, MSK, DIV can be directly loaded from the FileCatalog?, in the sam way that they are in VSANS

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/Dev/trunk/NCNR_User_Procedures/Reduction/SANS/CatVSTable.ipf

    r1004 r1240  
    131131 
    132132                ModifyTable width(Point)=0              //JUN04, remove point numbers - confuses users since point != run 
     133                 
     134                // (DONE - FEB 2020) 
     135        //  x- experimental hook with contextual menu 
     136        //               
     137                SetWindow kwTopWin hook=CatTableHook, hookevents=1      // mouse down events 
    133138        Endif 
    134139 
     
    865870        //Notebook CatWin,text=temp 
    866871End 
     872 
     873 
     874// 
     875// TODO: 
     876//  this is experimental...not been tested by any users yet 
     877// -- FEB 2020 copied this function over from VSANS, since it was popular there 
     878// 
     879// -- what else to add to the menu? (MSK and DIV now work) 
     880// -- add directly to WORK files? 
     881// -- "set" as some special file type, intent, use? (quick "patch" operations) 
     882// -- "check" the reduction protocol for completeness? 
     883// 
     884// x- seems to not "let go" of a selection (missing the mouse up?) 
     885//    (possibly) less annoying if I only handle mouseup and present a menu then. 
     886// 
     887Function CatTableHook(infoStr) 
     888        String infoStr 
     889        String event= StringByKey("EVENT",infoStr) 
     890         
     891        Variable ii 
     892         
     893        String pathStr 
     894        PathInfo catPathName 
     895        pathStr = S_path 
     896         
     897//      Print "EVENT= ",event 
     898        strswitch(event) 
     899                case "mouseup": 
     900//                      Variable xpix= NumberByKey("MOUSEX",infoStr) 
     901//                      Variable ypix= NumberByKey("MOUSEY",infoStr) 
     902//                      PopupContextualMenu/C=(xpix, ypix) "yes;no;maybe;" 
     903                        PopupContextualMenu "Load RAW;Load MSK;Load DIV;-;Send to MRED;" 
     904         
     905         
     906         
     907 
     908//              root:myGlobals:CatVSHeaderInfo:Filenames         
     909                        WAVE/T Filenames = $"root:myGlobals:CatVSHeaderInfo:Filenames" 
     910                        Variable err 
     911                        strswitch(S_selection) 
     912                                case "Load RAW": 
     913                                        GetSelection table,CatVSTable,1 
     914//                                      Print V_flag, V_startRow, V_startCol, V_endRow, V_endCol 
     915                                        Print "Loading " + FileNames[V_StartRow] 
     916                                        ReadHeaderAndData(pathStr + FileNames[V_StartRow])      //this is the full Path+file 
     917//                                      err = V_LoadHDF5Data(FileNames[V_StartRow],"RAW") 
     918                                        if(!err)                //directly from, and the same steps as DisplayMainButtonProc(ctrlName) 
     919                                                // this (in SANS) just passes directly to fRawWindowHook() 
     920                                                UpdateDisplayInformation("RAW")         // plot the data in whatever folder type 
     921                                        endif 
     922                                        break 
     923                                         
     924                                case "Load MSK": 
     925                                        GetSelection table,CatVSTable,1 
     926//                                      Print V_flag, V_startRow, V_startCol, V_endRow, V_endCol 
     927                                        Print "Loading " + FileNames[V_StartRow] 
     928                                        ReadMCID_MASK(pathStr + FileNames[V_StartRow]) 
     929                                        Execute "maskButtonProc(\"maskButton\")" 
     930                                         
     931                                        break 
     932                                         
     933                                case "Load DIV": 
     934                                        GetSelection table,CatVSTable,1 
     935//                                      Print V_flag, V_startRow, V_startCol, V_endRow, V_endCol 
     936                                        Print "Loading " + FileNames[V_StartRow] 
     937                                         
     938                                        ReadHeaderAndWork("DIV",pathStr + FileNames[V_StartRow]) 
     939                                         
     940                                        break 
     941                                case "Send to MRED": 
     942                                        //  root:myGlobals:MRED:gFileNumList 
     943                                        SVAR/Z numList=root:myGlobals:MRED:gFileNumList 
     944                                        if(SVAR_Exists(numList)) 
     945                                                GetSelection table,CatVSTable,1 
     946                                                for(ii=V_StartRow;ii<=V_endRow;ii+=1) 
     947        //                                              Print "selected " + FileNames[ii] 
     948                                                        numList += fileNames[ii] + "," 
     949                                                endfor 
     950                                                // pop the menu on the mred panel 
     951                                                MREDPopMenuProc("",1,"") 
     952                                        endif 
     953                                        break 
     954                                         
     955                        endswitch               //popup selection 
     956        endswitch       // event 
     957         
     958        return 0 
     959End 
     960 
Note: See TracChangeset for help on using the changeset viewer.