Syntax
DrawGetCalloutTextbox TwoDimensionalArray[$]() [, Object]
Remarks
Fills a two-dimensional array with coordinates that describe the position and size of the text area within the bounding rectangle of the specified callout drawing object.
Argument | Explanation |
TwoDimensionalArray[$]() | The predefined two-dimensional array to fill with the coordinates of the specified callout text box. TwoDimensionalArray[$]() may be a string or numeric array. A string array is filled with text measurements consisting of a number followed by the abbreviation for the default measurement unit. A numeric array is filled with the numbers only. For example, given an array pts() defined with the instruction Dim pts(2, 2), the instruction DrawGetCalloutTextbox pts() fills the array as follows: pts(1, 1) The horizontal position (the distance from the left edge of the bounding rectangle to the text area), in the default measurement unit pts(1, 2) The vertical position (the distance from the top edge of the bounding rectangle to the text area) pts(2, 1) The width of the text area pts(2, 2) The height of the text area |
Object | Specifies a drawing object: Omitted The selected drawing object > 0 (zero) An object whose anchor is in a range set by the DrawSetRange statement, where 1 is the first object in the range, 2 is the second object, and so on. If the number is not in the range 1 to DrawCount(), an error occurs. If the specified drawing object is not a callout, an error occurs. |
Example
This example displays a message box showing the horizontal position, vertical position, width, and height of the text area within the selected callout:
Dim pts$(2, 2) DrawGetCalloutTextbox pts$() msg$ = "HorizPos: " + pts$(1, 1) + Chr$(13) msg$ = msg$ + "VertPos: " + pts$(1, 2) + Chr$(13) msg$ = msg$ + "Width: " + pts$(2, 1) + Chr$(13) msg$ = msg$ + "Height: " + pts$(2, 2) + Chr$(13) MsgBox msg$, "Text Area In Callout"
See Also
DrawCallout, DrawSetCalloutTextbox, DrawSetInsertToTextbox