8350 发表于 2016-5-14 11:51:59

改一段代码，谢谢

这是插入指定文件文件的lsp，但是运行后每次都要填写：插入点，比例因子，旋转哦，麻烦，能否改成插入指定位置后直接插入到：插入点为0,0,0比例为1，旋转为0，谢谢，我不会lsp

;插入基本农田
(DEFUN C:crjbnt( )
(SETVAR "CMDECHO" 0)
(SETVAR "OSMODE" 0)
(COMMAND "_INSERT" (strcat"*" "D:/地类基本农田数据/基本农田.dwg" )(getpoint "\n图块插入点:" ))
(princ)
)

Andyhon 发表于 2016-5-14 13:11:08

(COMMAND "_INSERT" (strcat"*" "D:/地類基本農田數據/基本農田.dwg" )(getpoint "\n圖塊插入點:" ))
===>
(COMMAND "_INSERT" (strcat"*" "D:/地類基本農田數據/基本農田.dwg" ) '(0 0 0) 1 1 0)

8350 发表于 2016-5-14 13:13:32

谢谢，收到，感谢

8350 发表于 2016-5-14 13:53:42

Andyhon 发表于 2016-5-14 13:11 static/image/common/back.gif
(COMMAND "_INSERT" (strcat"*" "D:/地類基本農田數據/基本農田.dwg" )(getpoint "\n圖塊插入點:" ))
===> ...

高手你好，怎么插入成功后插入图形不在原来的位置，偏移很多呢？全选图形后复制黏贴原坐标到图形确又可以，请教是什么原因引起的，麻烦看看

Andyhon 发表于 2016-5-14 15:03:58

有可能是因 InsPoint ...
得核验文档 (*Dwg)

8350 发表于 2016-5-14 16:21:58

Andyhon 发表于 2016-5-14 15:03 static/image/common/back.gif
有可能是因 InsPoint ...
得核验文档 (*Dwg)

能帮我想想办法处理么？

Andyhon 发表于 2016-5-14 17:09:46

得有样本供查验
页: [1]
查看完整版本: 改一段代码，谢谢