Extended Gadget structure
Source position: intuition.pas line 169
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: NativeUInt; |
||
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 |