几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量

几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量 (http://www.dimcax.com/hust/index.php)
-   ObjectARX(AutoLISP) (http://www.dimcax.com/hust/forumdisplay.php?f=178)
-   -   请教一个尺寸标注文字替代lisp,谢谢! (http://www.dimcax.com/hust/showthread.php?t=12595)

yang686526 2009-04-27 12:42 PM

请教一个尺寸标注文字替代lisp,谢谢!
 
请教一个尺寸标注文字替代lisp,谢谢!
www.dimcax.com
请教一个尺寸标注文字替代lisp,谢谢!
例15.000,1.输入命令后,2.输入字符"int” 3.选尺寸15.000(最好可复选)回车尺寸变成int15.000
d
(defun c:tt ()
(if (setq stt (getstring "\n输入字符 :")) (progn
(setq stt (strcat stt "<>"))
(command ".dimoverride" "dimpost" stt "")
))
(princ)
)
踅摸
d


所有的时间均为北京时间。 现在的时间是 06:45 AM.