Changeset 231 for trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/letsdraw.pro
- Timestamp:
- 03/19/07 18:15:51 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/letsdraw.pro
r163 r231 1 1 ;+ 2 ; @file_comments 3 ; It is the procedure launching the drawing. 4 ; If we do not give the command to it, it call 2 ; 3 ; @file_comments 4 ; It is the procedure launching the drawing. 5 ; If we do not give the command to it, it call 5 6 ; construitcommande to know what to trace. 6 7 ; 7 8 ; @categories 8 9 ; 9 ;10 10 ; @param BASE {in}{required} 11 11 ; The id of the widget where apply the drawing. 12 ; 12 ; 13 13 ; @keyword COMMANDE {type=string} 14 14 ; A string of the style: read_data('sst'...),... 15 15 ; 16 16 ; @keyword _EXTRA 17 ; Used to pass your keywords18 ; 17 ; Used to pass keywords 18 ; 19 19 ; @uses 20 ; common.pro 21 ; 20 ; common.pro 21 ; 22 22 ; @history 23 23 ; Sebastien Masson (smasson\@lodyc.jussieu.fr) 24 ; 25 ; @version 24 ; 25 ; @version 26 26 ; $Id$ 27 ; 27 ; 28 28 ;- 29 ; 29 30 PRO letsdraw, base, COMMANDE = commande, _extra = ex 30 31 ; … … 73 74 ; 74 75 ; 75 options = extractatt(top_uvalue, 'options') 76 options = extractatt(top_uvalue, 'options') 76 77 optionsflag = extractatt(top_uvalue, 'optionsflag') 77 78 portrait = (strtrim(optionsflag[where(options EQ 'Portrait/Landscape'), 0], 1))[0] 78 79 79 80 ; 80 81 createpro, ['@common' $
Note: See TracChangeset
for help on using the changeset viewer.