Guest lesliemat 发表于 2022-7-6 10:39:53

插入文本并对其进行编辑

改造:
 
我需要一个程序来做这样的事情。。。。
 
文本大小=0.1875
宽度系数=0.8
 
拾取点
从该点向下偏移1“
开始文本框“数量=(用户输入)”
前一个“材质=(用户输入)”下方的开始文本框
前一个“厚度=(用户输入)”下方的开始文本框
前一个“名称=(用户输入)-1”下方的开始文本框
在前一个文本框“Machine=Trumf L2530 PLUS”的正下方启动文本框
重复
 
拾取点
从该点向下偏移1“
开始文本框“数量=(用户输入)”
前一个“材质=(用户输入)”下方的开始文本框
前一个“厚度=(用户输入)”下方的开始文本框
在前一个“名称=(用户输入)-2”下方的开始文本框
在前一个文本框“Machine=Trumf L2530 PLUS”的正下方启动文本框
重复
...
...
要退出,请按esc键,增量值将重置为0
 
现在棘手的部分是,在“名称”文本框中,用户将输入图形名称,并将其存储为变量(称为“dname”)。然后,每当程序重复并到达用户要输入“名称”的点时,程序将自动插入“dname”。每次拾取新点时,'-1'也将增加1。我不确定如何以这种方式与文本交互,甚至不确定这是否可行。感谢您的帮助。

要插入的文本。图纸

alanjt 发表于 2022-7-6 11:13:29

看起来你已经解决了。只需提示用户进行您想要的每个更改(厚度等),然后创建文本对象。

alanjt 发表于 2022-7-6 11:21:27

在该点处拆分文本,然后从该点开始递增。

Guest lesliemat 发表于 2022-7-6 11:46:31

这就是我目前所拥有的。这是一个DCL/Lisp组合,我不知道如何在visual Lisp中处理文本。任何指针都是有用的。
 
-M
SFMNT数据2。lsp
页: [1]
查看完整版本: 插入文本并对其进行编辑