Finally I'm back from vacation. So we can go on working on this
program.
I have written a completly new one and approach the task in an other
way because I was not satisfied with the coloured buttons.
Pressing the "START"-button the program below executes consecutively
several programs:
FITS integrity ckeck
SNR estimation
Saturation check
Aux. data check
After a check was done the corresponding label initally printing
"----" shall print "DONE"
My question:
How can I change the values of the widgetLabels "check1-8"
consecutively from "----" to "DONE" ?
I have already tried for example:
WIDGET_CONTROL, "uservalue", SET_VALUE="DONE"
But apparently it isn't that easy. Is it?
Read the comments of QUICKLOOK_EVENT to see my problem
Greetings,
Michael
------------------------------------------------------------ -----------------------
PRO quicklook_event, event
WIDGET_CONTROL, event.ID, GET_UVALUE=uval
IF (uval EQ 'start') THEN BEGIN
; run FITS integrity ckeck
; How to address Widget_Label "check1" and set value
from "----" to "DONE"
; run SNR estimation
; How to address Widget_Label "check2" and set value
from "----" to "DONE"
; run Saturation check
; How to address Widget_Label "check3" and set value
from "----" to "DONE"
; run Aux. data check
; How to address Widget_Label "check4" and set value
from "----" to "DONE"
ENDIF
IF (uval EQ 'quit') THEN BEGIN
WIDGET_CONTROL, event.TOP, /DESTROY
ENDIF
END
PRO QUICKLOOK
tlb = WIDGET_BASE(/COLUMN, TITLE='IQLAC Quicklook Standalone')
start = WIDGET_BUTTON(tlb, UVALUE='start', VALUE='Start', FRAME=4, /
ALIGN_CENTER)
SCA = WIDGET_BASE(tlb, /ROW)
SCA_A_title = WIDGET_BASE(SCA, /COLUMN, FRAME=4)
title_A = WIDGET_LABEL(SCA_A_title, VALUE='SCA-A', /ALIGN_CENTER)
SCA_A_base = WIDGET_BASE(SCA_A_title, /ROW, FRAME=1)
SCA_A_base1 = WIDGET_BASE(SCA_A_base, /COLUMN)
SCA_A_base2 = WIDGET_BASE(SCA_A_base, /COLUMN)
SCA_B_title = WIDGET_BASE(SCA, /COLUMN, FRAME=4)
title_B = WIDGET_LABEL(SCA_B_title, VALUE='SCA-B', /ALIGN_CENTER)
SCA_B_base = WIDGET_BASE(SCA_B_title, /ROW, FRAME=1)
SCA_B_base1 = WIDGET_BASE(SCA_B_base, /COLUMN)
SCA_B_base2 = WIDGET_BASE(SCA_B_base, /COLUMN)
wBtn1 = WIDGET_LABEL(SCA_A_base1, UVALUE='wBtn1', FRAME=1,
SCR_XSIZE=150, VALUE='FITS integrity ckeck')
wBtn2 = WIDGET_LABEL(SCA_A_base1, UVALUE='wBtn2', FRAME=1,
SCR_XSIZE=150, VALUE='SNR estimation')
wBtn3 = WIDGET_LABEL(SCA_A_base1, UVALUE='wBtn3', FRAME=1,
SCR_XSIZE=150, VALUE='Saturation check')
wBtn4 = WIDGET_LABEL(SCA_A_base1, UVALUE='wBtn4', FRAME=1,
SCR_XSIZE=150, VALUE='Aux. data check')
check1 = WIDGET_LABEL(SCA_A_base2, UVALUE='check1', FRAME=1,
VALUE='----')
check2 = WIDGET_LABEL(SCA_A_base2, UVALUE='check2', FRAME=1,
VALUE='----')
check3 = WIDGET_LABEL(SCA_A_base2, UVALUE='check3', FRAME=1,
VALUE='----')
check4 = WIDGET_LABEL(SCA_A_base2, UVALUE='check4', FRAME=1,
VALUE='----')
wBtn5 = WIDGET_LABEL(SCA_B_base1, UVALUE='wBtn5', FRAME=1,
SCR_XSIZE=150, VALUE='FITS integrity ckeck')
wBtn6 = WIDGET_LABEL(SCA_B_base1, UVALUE='wBtn6', FRAME=1,
SCR_XSIZE=150, VALUE='SNR estimation')
wBtn7 = WIDGET_LABEL(SCA_B_base1, UVALUE='wBtn7', FRAME=1,
SCR_XSIZE=150, VALUE='Saturation check')
wBtn8 = WIDGET_LABEL(SCA_B_base1, UVALUE='wBtn8', FRAME=1,
SCR_XSIZE=150, VALUE='Aux. data check')
check5 = WIDGET_LABEL(SCA_B_base2, UVALUE='check5', FRAME=1,
VALUE='----')
check6 = WIDGET_LABEL(SCA_B_base2, UVALUE='check6', FRAME=1,
VALUE='----')
check7 = WIDGET_LABEL(SCA_B_base2, UVALUE='check7', FRAME=1,
VALUE='----')
check8 = WIDGET_LABEL(SCA_B_base2, UVALUE='check8', FRAME=1,
VALUE='----')
quit = WIDGET_BUTTON(tlb, UVALUE='quit', VALUE='Quit', /ALIGN_CENTER)
WIDGET_CONTROL, tlb, /REALIZE
XMANAGER, 'quicklook', tlb
END
|
comp.lang.idl-pvwave archive
Members
Search
Help
Login
Home
