Cavediver 发表于 2012-7-6 09:39:34

导出封闭形

**** Hidden Message *****

ronjonp 发表于 2012-7-6 10:00:27


使用 BASE 命令更改原点。

Cavediver 发表于 2012-7-9 13:18:06

因为我在dxfout过程中找不到那个选项，我想你是说我应该在dxfout之前做这个？
(知道他们对假设的说法，我只是想我应该确定一下)

ronjonp 发表于 2012-7-10 08:54:16

或者先写WBLOCK，然后再写DXFOUT

mjfarrell 发表于 2012-7-10 09:05:52

这个线程
看到这个代码
不工作（我不知道为什么可能是DXFOUT命令），但显示的想法
(defun c:dxft (/ fldia ss)
(setq fldia (getvar "filedia"))
(setvar "filedia" 0)
(setq p1 (getpoint "\nSelect first point of export: "))
(setq p2 (getcorner p1 "\nSelect second point of export: "))
(setq ss (ssget "_W" p1 p2))

(command "dxfout" "" ss "" "")
(setvar "filedia" fldia)
)

HasanCAD 发表于 2012-7-16 05:48:37

发布不起作用的代码实际上对任何人都有帮助吗？
可能是一个很好的主意，但是如果实现它的代码不能；那么它仍然只是一个想法。

mjfarrell 发表于 2012-7-16 06:30:05

正在工作
(defun c:dxft (/ fldia p1 p2 ss)

(setq fldia (getvar "filedia"))
(setvar "filedia" 0)
(setq p1 (getpoint "\nSelect first point of export: "))
(setq p2 (getcorner p1 "\nSelect second point of export: "))
(setq ss (ssget "_W" p1 p2))

(command "dxfout" "" "o" ss "" "")
(setvar "filedia" fldia)
)
页: [1]
查看完整版本: 导出封闭形