改一段代码，谢谢

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

这是插入指定文件文件的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

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

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

谢谢，收到，感谢

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

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

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

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

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

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

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

能帮我想想办法处理么？

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

得有样本供查验

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

[测绘] 改一段代码，谢谢

相关帖子