vla-get-CanonicalMediaName 函数 |
功能
以名称取得图纸大小。
语法及参数
(vla-get-CanonicalMediaName Object) | ||
Object | Layout, PlotConfiguration | |
这个属性适用的对象。 | ||
CanonicalMediaName | 字符串;读/写 | |
图纸尺寸的名称。 |
说明
对这个属性进的改变要在下一次重成生图形时才能看见。使用Regen方法重生成图形。
范例
;;;从二代龙震工作室汉化帮助中提取 ;;;本源代码由 xshrimp 2013.2.20 搜集整理,版权归原作者所有! (defun Example_CanonicalMediaName() ;;; 这个范例找出激活布局的图纸尺寸的名称 ;;; 并改变图纸尺寸的名称 (VL-LOAD-COM) (setq AcadObject(vlax-get-acad-object) AcadDocument(vla-get-ActiveDocument Acadobject) mSpace(vla-get-ModelSpace Acaddocument) ) ;;; 切换到图纸空间 (vla-put-ActiveSpace AcadDocument acPaperSpace) ;;; 找出当前的图纸尺寸的名称 (setq activeLayoutSel(vla-get-ActiveLayout AcadDocument)) (setq currMediaName(vla-get-CanonicalMediaName activeLayoutSel)) (if (= currMediaName "") (princ "激活的布局未设定任何图纸尺寸") (progn (princ "激活的布局的图纸尺寸当前为: ") (princ (STRCAT currMediaName "\n")) ) ) (PROMPT "进行:")(VL-CMDF pause) ;;; 修改图纸尺寸的名称(图纸尺寸中必须含有该图纸尺寸) (vla-put-CanonicalMediaName activeLayoutSel "A5") (vla-Regen AcadDocument :vlax-true) (setq newMediaName(vla-get-CanonicalMediaName activeLayoutSel)) (princ "激活的配置的图纸尺寸当前为: ") (princ newMediaName) (princ) )
意见? |