TAProperties.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
written by Beach, June 22, 1982 8:56 pm
provide access to TiogaArtwork Properties
DIRECTORY
TextNode USING [Ref];
TAProperties: CEDAR DEFINITIONS = {
AnArtworkNode: PROCEDURE [node: TextNode.Ref] RETURNS [BOOLEAN];
SetArtworkProp: PROCEDURE [node: TextNode.Ref];
AnArtworkFileName: PROCEDURE [node: TextNode.Ref] RETURNS [BOOLEAN];
SetArtworkFileNameProp: PROCEDURE [node: TextNode.Ref];
AnArtworkImage: PROCEDURE [node: TextNode.Ref] RETURNS [BOOLEAN];
SetArtworkImageProp: PROCEDURE [node: TextNode.Ref];
AnArtworkPath: PROCEDURE [node: TextNode.Ref] RETURNS [BOOLEAN];
SetArtworkPathProp: PROCEDURE [node: TextNode.Ref];
GetBoundingBox:
PROCEDURE [node: TextNode.Ref]
RETURNS [x,y:
REAL ← 0];
return bounding box limits for this node
SetBoundingBoxProp: PROCEDURE [node: TextNode.Ref, x,y: REAL];
GetOrigin:
PROCEDURE [node: TextNode.Ref]
RETURNS [x,y:
REAL ← 0];
return the origin coordinates relative to the bounding box
SetOriginProp:
PROCEDURE [node: TextNode.Ref, x,y:
REAL];
establish the origin coordinate relative to the bounding box
}.