Changeset 495 for trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET
- Timestamp:
- 04/17/14 10:49:43 (10 years ago)
- Location:
- trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_bgroup.pro
r327 r495 53 53 end 54 54 55 56 57 55 ;+ 58 56 ; @file_comments … … 62 60 ; 63 61 ; @param ID 64 ;65 62 ; 66 63 ; @param VALUE … … 167 164 endelse 168 165 end 169 170 171 172 173 166 ; 174 167 ;+ … … 379 372 IF (N_ELEMENTS(y_scroll_size) eq 0) then y_scroll_size = 0 380 373 381 382 383 384 374 top_base = 0L 385 375 if (n_elements(label_top) ne 0) then begin … … 424 414 EVENT_FUNC='CW_BGROUP_EVENT', $ 425 415 UVALUE=WIDGET_INFO(top_base, /child)) 426 427 416 428 417 n = n_elements(names) -
trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_calendar.pro
r371 r495 35 35 ; return 36 36 ; END 37 ;38 ;39 37 ;+ 40 38 ; … … 72 70 widget_control, winfo_id, get_uvalue = infowid 73 71 key_caltype = infowid.caltype 74 ; high freq euncy calendar72 ; high frequency calendar 75 73 IF keyword_set(infowid.fakecal) THEN BEGIN 76 74 value2 = date2jul(long(value)) - infowid.fakecal … … 104 102 ; @file_comments 105 103 ; 106 ;107 104 ; @categories 108 105 ; Compound widget 109 106 ; 110 107 ; @param ID 111 ;112 108 ; 113 109 ; @returns … … 137 133 ; @file_comments 138 134 ; 139 ;140 135 ; @categories 141 136 ; Compound widget … … 143 138 ; @param ID 144 139 ; 145 ;146 140 ; @param WINFOID 147 ;148 141 ; 149 142 ; @returns … … 182 175 month = (where(allmonths EQ wid_value.combobox_gettext))[0] + 1 183 176 date = date + 100L * long(month) 184 ENDIF ELSE date = date + (oldate MOD 10000L)/ 100L*100L177 ENDIF ELSE date = date + (oldate MOD 10000L)/ 100L * 100L 185 178 ;-------------year---------------- 186 179 wid_id = widget_info(id, find_by_uname = 'year') … … 198 191 ;+ 199 192 ; @file_comments 200 ;201 193 ; 202 194 ; @categories … … 300 292 ; @file_comments 301 293 ; 302 ;303 294 ; @categories 304 295 ; Compound widget … … 306 297 ; @param EVENT 307 298 ; 308 ;309 299 ; @param CASENAME 310 ;311 300 ; 312 301 ; @returns … … 359 348 ; 360 349 ; @param EVENT 361 ;362 350 ; 363 351 ; @returns … … 424 412 ; @file_comments 425 413 ; 426 ;427 414 ; @categories 428 415 ; Compound widget … … 433 420 ; @param CALENDAR 434 421 ; 435 ;436 422 ; @param JDATE0 437 423 ; … … 440 426 ; @keyword FAKECAL 441 427 ; 442 ;443 428 ; @keyword UVALUE 444 429 ; 445 430 ; @keyword UNAME 446 ;447 431 ; 448 432 ; @keyword _EXTRA … … 524 508 monthindex = where(yearcal EQ year0) 525 509 currentmonth = long(monthcal[monthindex]) 526 ; we suppress the repe ted months510 ; we suppress the repeated months 527 511 monthindexbis = uniq(currentmonth, sort(currentmonth)) 528 512 monthindex = monthindex[monthindexbis] -
trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_domain.pro
r493 r495 37 37 ; end 38 38 ; 39 ;40 39 ;+ 41 40 ; … … 46 45 ; 47 46 ; @param ID 48 ;49 47 ; 50 48 ; @param VALUE … … 516 514 ; 5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 517 515 ; 6 elements: The extraction is made on Boxzoom 518 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last 516 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last 519 517 ; <pro>domdef</pro>! 520 518 ; … … 541 539 FUNCTION cw_domain, parent, BOXZOOM=boxzoom, STRICT=strict $ 542 540 , UVALUE=uvalue, UNAME=uname, UNZOOM=unzoom, _EXTRA=ex 543 ;544 541 ; 545 542 compile_opt idl2, strictarrsubs -
trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_slide_slice.pro
r327 r495 116 116 117 117 ; widget_control, uniteid, get_value = unite 118 ;119 118 ; 120 119 ; if uval.name EQ 'unite' then begin … … 162 161 ; @file_comments 163 162 ; 164 ;165 163 ; @categories 166 164 ; Compound widget … … 177 175 ; 5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 178 176 ; 6 elements: The extraction is made on Boxzoom 179 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last 177 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last 180 178 ; <pro>domdef</pro> ! 181 179 ; -
trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_slider_pm.pro
r327 r495 145 145 ; @file_comments 146 146 ; 147 ;148 147 ; @categories 149 148 ; Compound widget … … 210 209 IF uval EQ 'decimal' THEN value = float(event.str) $ 211 210 ELSE value = float(widget_info(dcid, /combobox_gettext)) 212 out = 0 ; defau t case211 out = 0 ; default case 213 212 case uval OF 214 213 'plus': if (value + 1) LE minmax[1] then value2 = value + 1 ELSE out = 1 … … 320 319 ; slider widget. 321 320 ; 322 ;323 321 ; @examples 324 322 ; See the program provided above (testwid and the associated procedure, testwid_event). -
trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_specifie.pro
r327 r495 249 249 rien = widget_text(base2, value = colvalue, /editable, xsize = 2, uname = 'palnum', uvalue = 'palnum') 250 250 251 252 253 251 ; widget text containing other keywords pass into top_uvalue.exextra 254 252 ; Does it remain some? If yes, we have to put them as string
Note: See TracChangeset
for help on using the changeset viewer.