[LISP程序]：文本合并的小程序

陈连升 · 发表于 2003-1-22 06:11:19

您需要登录才可以下载或查看，没有账号？立即注册

×

自己编制的小程序，有不足之处请指出：ur1517@inhe.net

张世杰 · 发表于 2003-1-22 07:44:07

什么东西？写了保护，打不开。

hrx · 发表于 2003-1-23 16:27:53

写了保护，打开后乱码

lt_zzy · 发表于 2003-1-23 17:41:16

你的这个程序有的时候不能按照文本的位置自己判断，有的时候将后面的文本弄到前面去了，而你所用的函数却又是多选择的函数，如果不能自己判断先后顺序，你应该用单选的函数。另外，你程序提示的DBA.LSP好象用不成。

LUCAS · 发表于 2003-1-24 09:22:22

程序中有註明按顺序选择文字,你沒注意???
(while (= nil sel)
(princ "请按顺序选择文字:")
(SETQ SEL (SSGET (LIST (CONS 0 "TEXT"))))
)

lmhan · 发表于 2007-10-8 19:37:13

哎,这个东西好啊!!!!

leeyuan · 发表于 2007-11-14 23:59:32

可以考虑按文字脚点坐标的大小排序，自动合并文字，比按顺序选择更实用。

hounengwei · 发表于 2014-4-26 09:25:36

感谢楼主提供这个

账号		自动登录	找回密码
密码			立即注册