![]() ![]() ![]() Space (vlax-get *doc* (if (= (getvar "cvport") 1) 'PaperSpace 'ModelSpace)) (or *doc* (setq *doc* (vla-get-ActiveDocument *acad*))) (or *acad* (setq *acad* (vlax-get-acad-object))) Initialize drawing and program variables: ((wcmatch (strcase error) "*QUIT*,*CANCEL*")) (if (= (type cmdecho) 'INT)(setvar "cmdecho" cmdecho)) (if (=(tblsearch "layer" "Contour Label") nil) v1.01 (04-27-08) in Fun Room - added precision fixed (atan.) Routine labels the elevation of 2D polylines and AECC_CONTOURS. (defun C:LabelContour ( / *error* cmdecho Done Space E Ent Etype Flag Obj P OK Ang Elev Prec) ![]() Hi, I am trying to change the text height by the giving scale using a ht parameter, but I can not find In the code where the text height change. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |