This function creates a relationship between the specified text block and the text adorner such that when theText Block is scaled in a VP, the text adorner is also scaled. Several objects can be adorned to the same text object.
FUNCTION SetTextAdorner(
textBlock : HANDLE;
textAdorner : HANDLE;
p : REAL): Boolean;def vs.SetTextAdorner(textBlock, textAdorner, p):
return Boolean| Name | Type | Description |
|---|---|---|
| textBlock | HANDLE | The Text object being adorned. |
| textAdorner | HANDLE | The object used to adorn the specified text. |
| p | REAL | The point by which texts will be scaled. |
PROCEDURE Example;
VAR
theText :HANDLE;
theShape : HANDLE;
restult : BOOLEAN;
BEGIN
TextVerticalAlign(3);
TextJust(2);
MoveTo(0,0);
RectangleN(-.5", -.5", 1, 0, 1", 1");
theShape := lNewObj;
CreateText('ID1');
theText := lNewObj;
restult := SetTextAdorner(theText,theShape,0,0);
END;
RUN(Example);Availability: from Vectorworks 2011