comp.lang.idl-pvwave archive: archive

Home » Public Forums » archive » WIDGETS

Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend

Re: widgets [message #45225 is a reply to message #2717]

Fri, 19 August 2005 08:02

David Fanning
Messages: 11724
Registered: August 2001

Senior Member

hernan writes:

> Como puedo hacer un widget que sume dos valores?

Como esto:

pro widget_sum_event, event

widget_control, event.top, get_uvalue = info
widget_control, info.text1, get_value=value1
widget_control, info.text2, get_value=value2
value = Float(value1[0]) + Float(value2[0])
widget_control, info.text, set_value = StrTrim(string(value),2)

end

pro widget_sum

;* Ingresamos la base de trabajo.
;* Creamos la primera entrada de datos
base_suma = widget_base(xsize = 300, ysize = 200)
eti1 = widget_label(base_suma, value = 'Ingrese el valor de a: ', $
xsize = 100, xoffset = 20, yoffset = 20)
text1 = widget_text(base_suma, value = '1', uvalue = 'uno', $
xoffset = 120, yoffset = 20, /editable)
;* Creamos la segunda entrada de datos
eti2 = widget_label(base_suma, value = 'Ingrese el valor de b: ', $
xsize = 100, xoffset = 20, yoffset = 60)
text2 = widget_text(base_suma, value = '1', uvalue = 'dos', $
xoffset = 120, yoffset = 60, /editable)
;* Creamos la salida de los datos
eti = widget_label(base_suma, value = 'La suma es: ', $
xsize = 100, xoffset = 20, yoffset = 100)
text = widget_text(base_suma, value = '1', $
xoffset = 120, yoffset = 100, /editable)
widget_control, base_suma, set_uvalue = 'text'
info = {text1:text1, text2:text2, text:text}
widget_control, base_suma, /realize, set_uvalue=info
xmanager, 'widget_sum', base_suma, /no_block
end

Salut,

David
--
David Fanning, Ph.D.
Fanning Software Consulting, Inc.
Coyote's Guide to IDL Programming: http://www.dfanning.com/

Report message to a moderator

[Message index]

		WIDGETS By: mallozzi on Tue, 30 August 1994 10:23
		Re: Widgets By: rivers on Thu, 22 September 1994 21:05
		Re: Widgets By: rouse on Sun, 18 September 1994 23:50
		Re: WIDGETS By: peter on Thu, 01 September 1994 14:03
		Re: WIDGETS By: zawodny on Thu, 01 September 1994 10:30
		Re: WIDGETS By: sjt on Thu, 01 September 1994 05:07
		Re: Widgets By: offenbrg on Wed, 07 February 1996 00:00
		Re: Widgets By: todd on Wed, 07 February 1996 00:00
		Re: Widgets By: davidf on Sun, 03 October 1999 00:00
		Re: Widgets By: Liam Gumley on Fri, 01 October 1999 00:00
		Re: Widgets By: Richard G. French on Thu, 07 October 1999 00:00
		Re: Widgets By: mgs on Wed, 06 October 1999 00:00
		Re: Widgets By: Robert LeeJoice on Wed, 06 October 1999 00:00
		Re: Widgets By: Richard G. French on Sun, 10 October 1999 00:00
		Re: Widgets By: davidf on Sat, 09 October 1999 00:00
		Re: widgets By: davidf on Fri, 18 August 2000 00:00
		Re: Widgets By: Rick Towler on Thu, 30 May 2002 08:11
		Re: Widgets By: David Fanning on Wed, 29 May 2002 11:24
		Re: widgets By: David Fanning on Fri, 19 August 2005 08:02

Previous Topic:	widgets
Next Topic:	Sort without loops

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Thu Oct 09 14:14:58 PDT 2025

Total time taken to generate the page: 0.87043 seconds