comp.lang.idl-pvwave archive
Messages from Usenet group comp.lang.idl-pvwave, compiled by Paulo Penteado

Home » Public Forums » archive » Re: CASE a UNAME??
Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend 
Return to the default flat view Create a new topic Submit Reply
Re: CASE a UNAME?? [message #27478 is a reply to message #27474] Thu, 25 October 2001 05:01 Go to previous messageGo to previous message
R.Bauer is currently offline  R.Bauer
Messages: 1424
Registered: November 1998
Senior Member
Dear Logan,

this is a widget with uname from our idl lecture.



regards
Reimar


pro wid5_event,event

widget_control,event.top,get_uvalue=x

CASE Event.id OF
WIDGET_INFO(event.top,find_by_uname='QUIT') :$
WIDGET_CONTROL,event.top,/destroy
WIDGET_INFO(event.top,find_by_uname='PRINT') : $
BEGIN
id=WIDGET_INFO(event.top,find_by_uname='TEXT')
WIDGET_CONTROL,id,set_value=(*x).value
(*x).value='neuer Text'
END
ELSE:
ENDCASE

end

pro wid5
x={value:'Hallo Du'}
x=ptr_new(x,/no_copy)

id_base=widget_base(row=3)

id_PRINT=widget_button(id_base,value='PRINT',$
uname='PRINT')
id_quit=widget_button(id_base,value='QUIT',$
uname='QUIT')

id_text=widget_text(id_base,value='',uname='TEXT')

widget_control,id_base,/realize,set_uvalue=x
xmanager,'wid5',id_base
ptr_free,x

end

--
Reimar Bauer

Institut fuer Stratosphaerische Chemie (ICG-1)
Forschungszentrum Juelich
email: R.Bauer@fz-juelich.de
http://www.fz-juelich.de/icg/icg1/
============================================================ ======
a IDL library at ForschungsZentrum Juelich
http://www.fz-juelich.de/icg/icg1/idl_icglib/idl_lib_intro.h tml

http://www.fz-juelich.de/zb/text/publikation/juel3786.html
============================================================ ======

read something about linux / windows
http://www.suse.de/de/news/hotnews/MS.html
[Message index]
 
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Previous Topic: Single Checkbox with CW_Form?
Next Topic: Open letter to RSI about dropping Alpha Tru64

-=] Back to Top [=-
[ Syndicate this forum (XML) ] [ RSS ] [ PDF ]

Current Time: Tue Dec 02 11:11:34 PST 2025

Total time taken to generate the page: 0.56403 seconds