Extended Gadget structure
Source position: intuition.pas line 161
type TExtGadget = record |
||
NextGadget: PExtGadget; |
|
|
LeftEdge: SmallInt; |
|
|
TopEdge: SmallInt; |
|
|
Width: SmallInt; |
|
|
Height: SmallInt; |
|
|
Flags: Word; |
|
|
Activation: Word; |
|
|
GadgetType: Word; |
|
|
GadgetRender: Pointer; |
|
|
SelectRender: Pointer; |
|
|
GadgetText: PIntuiText; |
|
|
MutualExclude: LongInt; |
|
|
SpecialInfo: Pointer; |
|
|
GadgetID: Word; |
|
|
UserData: Pointer; |
|
|
MoreFlags: LongWord; |
|
Additional flags (GMORE_*) |
BoundsLeftEdge: SmallInt; |
|
Bounding extent for gadget, valid |
BoundsTopEdge: SmallInt; |
|
only if GMORE_BOUNDS is set. The |
BoundsWidth: SmallInt; |
|
GFLG_RELxxx flags affect these |
BoundsHeight: SmallInt; |
|
coordinates as well. |
end; |
Check TGadget for the meaning for the first fields.
|
Structure to describe a Gadget |
|
|
Flag for TGadget.SpecialInfo. Gadget is an PExtGadget |