I need to declare some shared fields between two object kinds out of 3. Does nimrod support this? i try this and get error message of image, imagePlace redefinition:
TUINode* = object of TObject
## A low-level graphics object like a control background,
## button caption etc.
localRect*, globalRect*: TUIRect
flags: TUINodeFlags
children*: seq[TUINode]
linkedObject*: PUINodeObject
parent*: PUINode
case bgType: TUINodeBgDrawType
of ndtNone: nil
of ndtFill:
fillColor: TUIColor
of ndtImage:
image: PUIImage
imagePlace: TUIImagePlace
of ndtImageParts:
image: PUIImage
imagePlace: TUIImagePlace
fixedLeft, fixedTop, fixedBottom, fixedRight: TUICoord
## - cut some pixels from the sides of the image and
## put them without scaling
textType: TUINodeTextType
drawProc*: TDrawNodeProc
updateProc*: TUpdateNodeProc