- Timestamp:
- 03/19/07 18:15:51 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/longclickaction.pro
r154 r231 1 1 ;+ 2 ; 2 3 ; @file_comments 3 ;4 4 ; 5 5 ; @categories 6 6 ; 7 ;8 7 ; @param EVENT 9 8 ; 10 ;11 9 ; @returns 12 ; 13 ; 10 ; 14 11 ; @uses 15 ; 16 ; 12 ; 17 13 ; @restrictions 18 ; 19 ; 14 ; 20 15 ; @examples 21 ; 22 ; 16 ; 23 17 ; @history 24 ; 25 ; 18 ; 26 19 ; @version 27 ; $Id$ 28 ; 20 ; $Id$ 21 ; 29 22 ; @todo 30 23 ; seb 31 24 ; 32 25 ;- 26 ; 33 27 PRO longclickaction, event 34 28 ; … … 66 60 y = [coor[1, 0], coor[1, 1]] 67 61 domainid = widget_info(event.top, find_by_uname = 'domain') 68 IF type EQ 'pltv' THEN BEGIN 62 IF type EQ 'pltv' THEN BEGIN 69 63 currentfile = extractatt(top_uvalue, 'currentfile') 70 64 listgrid = (*(extractatt(top_uvalue, 'fileparameters'))[currentfile]).listgrid … … 79 73 ; Do we have to pass the boxzoom in indexes ??? 80 74 currentplot = (extractatt(top_uvalue, 'smallin'))[2]-1 81 options = extractatt(top_uvalue, 'options') 75 options = extractatt(top_uvalue, 'options') 82 76 flags = extractatt(top_uvalue, 'optionsflag') 83 77 flags = flags[*, currentplot] … … 107 101 letsdraw, event.top 108 102 END 109 2:BEGIN 110 IF type EQ 'plt' THEN BEGIN 103 2:BEGIN 104 IF type EQ 'plt' THEN BEGIN 111 105 (*top_uvalue[1, findline(top_uvalue, 'types')])[smallout[2]-1] = 'pltz' 112 106 forcetype = 'pltz' 113 ENDIF 107 ENDIF 114 108 updatewidget, event.top, /noboxzoom 115 109 letsdraw, event.top, forcetype = forcetype 116 110 END 117 111 4:BEGIN 118 IF type EQ 'plt' THEN BEGIN 112 IF type EQ 'plt' THEN BEGIN 119 113 (*top_uvalue[1, findline(top_uvalue, 'types')])[smallout[2]-1] = 'pltt' 120 114 forcetype = 'pltt' 121 ENDIF 115 ENDIF 122 116 updatewidget, event.top, /noboxzoom, /nodates 123 117 letsdraw, event.top, forcetype = forcetype
Note: See TracChangeset
for help on using the changeset viewer.