大洗衣盆 发表于 2009-2-6 13:31:00

[讨论]如何实现，按键自动生成字符。

本帖最后由 作者 于 2009-2-6 13:31:51 编辑 <br /><br /> <p><font color="#0909f7">重复几个字母或者数字，每次都要粘贴以后再修改内容。</font></p><p><font color="#0909f7">能不能实现直接按键，就生成想要的文字，直接鼠标定位就可以了。</font></p><p><font color="#0909f7">感觉比较简单吧。</font></p><p><font color="#0909f7">例：按键盘上的“1”键，就在图中生成了一个1的数字，鼠标点击一下，定位就OK了。</font></p>

happyboy75 发表于 2009-2-6 17:58:00

定义text的内容获得点了

大洗衣盆 发表于 2009-2-6 17:59:00

<p>机械专业的我，憋了一下午，弄出来了。。。</p><p></p><p>(defun c:1(/ sw)<br/>&nbsp; (setq sw (getstring "\n入力字符:"))<br/>&nbsp; (COMMAND "TEXT" (setq p (getpoint "\n取位置：")) "10" "0" sw)<br/>&nbsp; (prin1)<br/>)</p>

大洗衣盆 发表于 2009-2-6 19:30:00

<p>就这几行，有位DX管我要100元，给我写。</p><p>一憋气，我自己来了。</p>
页: [1]
查看完整版本: [讨论]如何实现，按键自动生成字符。