PopUpSelection2Private.mesa
Copyright Ó 1991 by Xerox Corporation. All rights reserved.
Mike Spreitzer February 12, 1987 5:29:07 pm PST
Last tweaked by Mike Spreitzer on January 30, 1989 11:37:10 am PST
DIRECTORY PopUpSelection2;
PopUpSelection2Private: CEDAR DEFINITIONS = {OPEN PopUpSelection2;
Menu: TYPE = REF MenuPrivate;
MenuPrivate: TYPE = RECORD [
choices: ChoiceS,
header: Image,
doc: ROPE,
allMayBeUp: BOOL,
left, top: Label,
fullRows, arrayRows, cols, timeOut: NAT,
height, width: NAT -- total size of menu, in pixels -- ¬ 0,
rowHeight, colWidth: NAT ¬ 0,
leftLabelSize, topLabelSize, headerSize, fullRowHeight, fullRowsSize: NAT ¬ 0,
arrayLeft, arrayRight, arrayBot, arrayTop, arrayHeight, arrayWidth: NAT ¬ 0,
headerBot, fullRowsBot: NAT ¬ 0
];
[Artwork node; type 'Artwork on' to command tool]
}.