DRAWBUTTONWIDGET_

DRAWBUTTONWIDGET__DEFINE

Name

DRAWBUTTONWIDGET

Purpose

The purpose of this routine is to construct a button widget from a draw widget.
The button is constucted using the system colors of the user's computer, so it
could look differently on each individual's computer.

Authors

FANNING SOFTWARE CONSULTING BURRIDGE COMPUTING
1645 Sheely Drive 18 The Green South
Fort Collins Warborough, Oxon
CO 80526 USA OX10 7DN, ENGLAND
Phone: 970-221-0438 Phone: +44 (0)1865 858279
E-mail: davidf@dfanning.com E-mail: davidb@burridgecomputing.co.uk

Syntax

buttonWidget = Obj_New("DrawButtonWidget", theParent)

Superclasses

DRAWWIDGET
WIDGETATOM
CATATOM
CATCONTAINER IDLITCOMPONENT
IDL_CONTAINER
EVENT_STURCTURE:
event = { DRAWBUTTONWIDGET_EVENT, $
ID:Obj_New(), $ ; The widget object that caused the event.
TOP: Obj_New(), $ ; The object at the top of the object hierarchy.
HANDLER:Obj_New(), $ ; The event handler object.
EVENT_NAME: "", $ ; The name of the event. (DRAWBUTTONWIDGET_EVENT)
NAME: "", $ ; The name of the DrawButtonWidget object.
SELECT:0L $ ; Always set to 1 for button events.
}

Class Structure

class = { DRAWBUTTONWIDGET, $
colors: Obj_New(), $ ; A SystemColors object for drawing colors.
event_handler:Obj_New(), $ ; The real event handler object(s) for the DROPLISTWIDGET.
event_method_real: "", $ ; The event method assigned by the user to this object widget.
fontname: "", $ ; The name of a true-type font to use for button text.
fontsize: 0.0, $ ; The font size of button text.
fonttype: 0L, $ ; The type of font you want (e.g, !P.Font).
offcenter: 0L, $ ; An offset from center of widget.
pixmap: Obj_New(), $ ; The pixmap for buffering output.
selected: 0L, $ ; A flag that indicates if the button has a selected (1) or unselected (0) appearance.
sensitive: 0L, $ ; A flag that indicates if the button is sensitive (1) or insensitive (0).
xsize: 0L, $ ; The X size of the widget.
ysize: 0L, $ ; The Y size of the widget.
value: "", $ ; The button value (text).
INHERITS DrawWidget $
}

Modification History

Written by: David W.Fanning, 21 January 2004.
Added NORELEASE keyword to INIT and SETPROPERTY methods. 10 May 2004. DWF.