几何尺寸与公差论坛------致力于产品几何量公差标准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)
-   -   [讨论]如何实现,按键自动生成字符。 (http://www.dimcax.com/hust/showthread.php?t=11398)

yang686526 2009-04-26 03:27 PM

[讨论]如何实现,按键自动生成字符。
 
[讨论]如何实现,按键自动生成字符。
www.dimcax.com
[讨论]如何实现,按键自动生成字符。
重复几个字母或者数字,每次都要粘贴以后再修改内容。
能不能实现直接按键,就生成想要的文字,直接鼠标定位就可以了。
感觉比较简单吧。
例:按键盘上的“1”键,就在图中生成了一个1的数字,鼠标点击一下,定位就ok了。
d
定义text的内容获得点了
d
机械专业的我,憋了一下午,弄出来了。。。
(defun c:1(/ sw)
(setq sw (getstring "\n入力字符:"))
(command "text" (setq p (getpoint "\n取位置:")) "10" "0" sw)
(prin1)
)
d
就这几行,有位dx管我要100元,给我写。
一憋气,我自己来了。
d


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