Procedure SetTextWidth Sets the text wrapping margin width of the referenced text object.
A call to SetTextWidth automatically activates text wrapping.
PROCEDURE SetTextWidth(
theText : HANDLE;
widthDistance : REAL);def vs.SetTextWidth(theText, widthDistance):
return None| Name | Type | Description |
|---|---|---|
| theText | HANDLE | Handle to text object. |
| widthDistance | REAL | Text wrapping margin setting for text. |
PROCEDURE Example;
FUNCTION IncreaseTextWidth(h :HANDLE) :BOOLEAN;
BEGIN
SetTextWidth(h, GetTextWidth(h) * 1.2);
END;
BEGIN
ForEachObjectInLayer(IncreaseTextWidth, 2, 0, 4);
END;
RUN(Example);VS Functions: GetTextWidth
Availability: from VectorWorks8.0