;+
; NAME:
;	qvu_value
; PURPOSE:
; CATEGORY:
;	Widget qvu
; CALLING SEQUENCE:
	PRO qvu_value, state, event
; INPUTS:
;	state		array[1]; type: structure
;					qset_page state structure
;	event		array[1]; type: structure
;					event structure send by 'Done' widget
; OUTPUTS:
;	(none)
; INCLUDE:
	@compile_opt.pro					; On error, return to caller
; SIDE EFFECTS:
; PROCEDURE:
; MODIFICATION HISTORY:
;	SEP-2001, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
;-

IF state.count NE 0 THEN BEGIN
	widget_control, state.wid_draw, get_uvalue=x, /no_copy
	value = x[event.x, event.y]
	widget_control, state.wid_draw, set_uvalue=x, /no_copy

	;if value eq 0.0 then value = BadValue(value)
	widget_control, state.wid_value, set_value=value
ENDIF

RETURN  &  END