- Timestamp:
- 03/19/07 18:15:51 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_slider_pm.pro
r226 r231 45 45 ; return 46 46 ; end 47 ;---------------------------------------------------------------------- 48 ;+ 49 ; @file_comments 50 ; 47 ;+ 48 ; 49 ; @file_comments 51 50 ; 52 51 ; @categories … … 69 68 ; $Id$ 70 69 ;- 70 ; 71 71 FUNCTION decvalue, value 72 72 ; … … 76 76 return, strtrim(string(floor(a) + 0.1*indgen(10), format = '(f15.1)'), 2) 77 77 end 78 ; ----------------------------------------------------------------------79 ;+ 80 ; @file_comments81 ; 78 ; 79 ;+ 80 ; 81 ; @file_comments 82 82 ; 83 83 ; @categories … … 100 100 ; $Id$ 101 101 ;- 102 ; 102 103 FUNCTION decind, value 103 104 ; … … 107 108 return, round(10*(a - floor(a))) ; !! computation accuracy 108 109 end 109 ; ----------------------------------------------------------------------110 ;+ 111 ; @file_comments112 ; 110 ; 111 ;+ 112 ; 113 ; @file_comments 113 114 ; 114 115 ; @categories … … 133 134 ; $Id$ 134 135 ;- 136 ; 135 137 PRO cw_slider_pm_set_value, id, value 136 138 ; … … 184 186 return 185 187 end 186 ;---------------------------------------------------------------------- 187 ;+ 188 ; 189 ;+ 190 ; 188 191 ; @file_comments 189 192 ; … … 207 210 ; $Id$ 208 211 ;- 212 ; 209 213 FUNCTION cw_slider_pm_get_value, id 210 214 ; … … 217 221 return, {value:value, slider_min_max:minmax} 218 222 end 219 ; ----------------------------------------------------------------------220 ;+ 221 ; @file_comments222 ; 223 ; 224 ;+ 225 ; 226 ; @file_comments 223 227 ; 224 228 ; @categories … … 240 244 ; $Id$ 241 245 ;- 246 ; 242 247 FUNCTION cw_slider_pm_event, event 243 248 ; … … 274 279 , VALUE:value, OUT:OUT} 275 280 end 276 ;---------------------------------------------------------------------- 277 ;------------------------------------------------------------ 278 ;------------------------------------------------------------ 279 ;------------------------------------------------------------ 281 ; 280 282 ;+ 281 283 ; … … 301 303 ; @keyword MINIMUM 302 304 ; 303 ;304 305 ; @keyword STRMINLEN 305 306 ; 306 ;307 307 ; @keyword _EXTRA 308 ; Used to pass yourkeywords308 ; Used to pass keywords 309 309 ; 310 310 ; @returns … … 381 381 ; 382 382 ;- 383 ;------------------------------------------------------------ 384 ;------------------------------------------------------------ 385 ;------------------------------------------------------------ 383 ; 386 384 FUNCTION cw_slider_pm, parent, MAXIMUM = maximum, MINIMUM = minimum $ 387 385 , STRMINLEN = strminlen, VALUE = value, UVALUE = uvalue $
Note: See TracChangeset
for help on using the changeset viewer.