AfmQueryTextSetPlacement

AfmQueryTextSetPlacement

To control the placement of the generated Query Text Label, prior to calling the QueryText function, call the following AutoLISP function:

( AfmQueryTextSetPlacement placement)

Note : Use of the bAbsoluteTextPlacement argument to the QueryText function is no longer supported .

Calling the ( AfmQueryTextSetPlacement placement) function is optional. If it is not used, then the Query Text Labels will be placed at the ‘default’ location in the drawing. 'Default' means the same location as the existing Asset Label.

The new ( AfmQueryTextSetPlacement placement) function significantly improves the control over label placement in the drawing by supporting the following options for the ‘placement’ argument:

Option Description
0:

Default (where existing Asset Label exists, and if none, centroid of the asset)

1:

Lower Left

2:

Lower Center

3:

Lower Right

4:

Middle Left

5:

Middle Center

6: Middle Right
7:

Upper Left

8: Upper Center
9:

Upper Right

Example

(defun c:QueryTextUpperLeft () (AfmQueryTextInitWithName "AFM_OCCUP") (AfmQueryTextSetOwner "rm") (AfmQueryTextSetAssigned "em") (AfmQueryTextSetStandard "emstd") (AfmQueryTextAddField "rm.rm_id") (AfmQueryTextAddField "em.em_id") (AfmQueryTextAddField "em.em_std") (AfmQueryTextAddField "em.phone") (AfmQueryTextSetPlacement 7) ;; A value of 7: Upper Left (AfmQueryText 0 ; Left Justification "HL-TMP" ; Layer on which query text is to be placed. 5.0 ; dHeight of text t ; Actual height specified? True if dHeight is actual height; false, if dHeight is plotted height. 5.0 ; dXoffset from asset text insertion point. 5.0 ; dYoffset from asset text insertion point. t ; One line per field? "/" ; field delimiter nil ; Show Query Text Dialog? nil ; Reuse previously modified parameters, if any ) )