AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~

[討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

上一篇主題 下一篇主題 向下

[討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 ginse0727 于 2016-03-01, 23:02

各位前輩,高手,大家好!
我有個問題想要請教,有關配置中如果加了數個視埠,目前先假設只有單一視埠好了,視埠會對應到模型空間裡的位置,我想要(用程式)取得視埠對應範圍在模型空間裡的左下角點(數據)與右上角點(數據),
請問有什麼方法可以取得嗎?使用LISP或是VBA都可以.

說明圖示如下:



在國外的論壇上找到我需要的資訊了,貼出來分享給有需要的人.
http://www.cadtutor.net/forum/archive/index.php/t-21820.html


ginse0727 在 2016-03-03, 04:14 作了第 2 次修改 (原因 : 在國外的論壇上找到相關資訊,貼出來分享給有需要的人.)
avatar
ginse0727
高級會員
高級會員

文章總數 : 256
年齡 : 43
來自 : 台北巿
職業 : 帷幕牆
愛好 : 電玩,漫畫,網路小說
個性 : 宅男/正直/死腦筋
使用年資 : 退伍後工作迄今,10年以上
使用版本 : 2012
積分 : 14
經驗值 : 4285
威望值 : 492
發帖精華 : 1
注冊日期 : 2010-07-12
經典問與答讀者 藍鵲61號
2011聚會勳章 男 獅子座 虎

回頂端 向下

回復: [討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 Tiger&蘋果爸 于 2016-03-03, 06:04

ginse0727 寫到:在國外的論壇上找到我需要的資訊了,貼出來分享給有需要的人.
http://www.cadtutor.net/forum/archive/index.php/t-21820.html
多謝分享找到的資訊~
不知道你的用途是用在哪呢?
竊喜

____________________________________________________________________________________
avatar
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 17316
年齡 : 41
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 15↑
使用版本 : AutoCAD 2016
經驗值 : 65280
威望值 : 12865
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i11.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

回復: [討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 ginse0727 于 2016-03-03, 21:14

是這樣的,現階段我在畫施工圖大多採用外部參考的模式,也就是主要的圖面畫在一張參考檔,其他的檔案都是參考外部參考檔的,舉例來說像是詳圖統統畫在一個外參裡,所有的圖檔全部都是去抓外參,只是視埠鎖定的位置不同,這樣的目的主要是方便查詢和修改圖面,但是竣工時就必需把圖面BIND進個別的檔案中,並清空圖面的不必要資訊,我想做的是把點選視埠後,只保留模型空間裡視埠內的圖元,其他非視埠外的圖元統統刪除.
avatar
ginse0727
高級會員
高級會員

文章總數 : 256
年齡 : 43
來自 : 台北巿
職業 : 帷幕牆
愛好 : 電玩,漫畫,網路小說
個性 : 宅男/正直/死腦筋
使用年資 : 退伍後工作迄今,10年以上
使用版本 : 2012
積分 : 14
經驗值 : 4285
威望值 : 492
發帖精華 : 1
注冊日期 : 2010-07-12
經典問與答讀者 藍鵲61號
2011聚會勳章 男 獅子座 虎

回頂端 向下

回復: [討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 Tiger&蘋果爸 于 2016-03-04, 02:30

ginse0727 寫到:是這樣的,現階段我在畫施工圖大多採用外部參考的模式,也就是主要的圖面畫在一張參考檔,其他的檔案都是參考外部參考檔的,舉例來說像是詳圖統統畫在一個外參裡,所有的圖檔全部都是去抓外參,只是視埠鎖定的位置不同,這樣的目的主要是方便查詢和修改圖面,但是竣工時就必需把圖面BIND進個別的檔案中,並清空圖面的不必要資訊,我想做的是把點選視埠後,只保留模型空間裡視埠內的圖元,其他非視埠外的圖元統統刪除.
是啊!我以前也是一個參考檔有很多圖面,每張個別BIND圖之後都沒有將其他非視埠外的圖元統統刪除,造成每張檔案過大。
你這個主意方式非常好!
後然BIND圖之後,是再搭配程式或腳本檔批次處理每張圖嗎!
竊喜

____________________________________________________________________________________
avatar
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 17316
年齡 : 41
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 15↑
使用版本 : AutoCAD 2016
經驗值 : 65280
威望值 : 12865
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i11.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

回復: [討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 ginse0727 于 2016-03-04, 04:06

是的,我就是想把這種繁雜的工作交給電腦,然後躲在一旁喝咖啡聊是非.

另外請教您一個問題,有關腳本的執行,如果腳本上加上是lisp寫出來的指令,可以執行嗎?
之前我試過,好像除了AUTOCAD內建的指令,自已編寫的指令,執行時會顯示找不到指令,
您有遇過這樣的情況嗎?有的話是怎麼克服的呢?


ginse0727 在 2016-03-04, 04:11 作了第 1 次修改 (原因 : 修改內容)
avatar
ginse0727
高級會員
高級會員

文章總數 : 256
年齡 : 43
來自 : 台北巿
職業 : 帷幕牆
愛好 : 電玩,漫畫,網路小說
個性 : 宅男/正直/死腦筋
使用年資 : 退伍後工作迄今,10年以上
使用版本 : 2012
積分 : 14
經驗值 : 4285
威望值 : 492
發帖精華 : 1
注冊日期 : 2010-07-12
經典問與答讀者 藍鵲61號
2011聚會勳章 男 獅子座 虎

回頂端 向下

回復: [討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 Tiger&蘋果爸 于 2016-03-04, 04:20

ginse0727 寫到:是的,我就是想把這種繁雜的工作交給電腦,然後躲在一旁喝咖啡聊是非.

另外請教您一個問題,有關腳本的執行,如果腳本上加上是lisp寫出來的指令,可以執行嗎?
之前我試過,好像除了AUTOCAD內建的指令,自已編寫的指令,執行時會顯示找不到指令,
您有遇過這樣的情況嗎?有的話是怎麼克服的呢?
腳本上加上是lisp指令,是可以執行的~
有時候要測試看看有沒有衝突,基本上我執行都沒有問題~
你可能要上傳你的腳本來討論看看!
認同

____________________________________________________________________________________
avatar
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 17316
年齡 : 41
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 15↑
使用版本 : AutoCAD 2016
經驗值 : 65280
威望值 : 12865
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i11.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

回復: [討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 ginse0727 于 2016-03-06, 00:45

可能是我測試用的電腦,使用的CAD有問題,因為就算程式中已載入了(vl-load-com),執行到下列這段程式 vlax-ename->vla-object,命令欄就會出現no function,現在空閒時間比較少,沒法子全心的來測試,等後續有完整一點的成果,再貼出來跟大家分享.
avatar
ginse0727
高級會員
高級會員

文章總數 : 256
年齡 : 43
來自 : 台北巿
職業 : 帷幕牆
愛好 : 電玩,漫畫,網路小說
個性 : 宅男/正直/死腦筋
使用年資 : 退伍後工作迄今,10年以上
使用版本 : 2012
積分 : 14
經驗值 : 4285
威望值 : 492
發帖精華 : 1
注冊日期 : 2010-07-12
經典問與答讀者 藍鵲61號
2011聚會勳章 男 獅子座 虎

回頂端 向下

回復: [討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 Tiger&蘋果爸 于 2016-03-07, 02:29

ginse0727 寫到:可能是我測試用的電腦,使用的CAD有問題,因為就算程式中已載入了(vl-load-com),執行到下列這段程式 vlax-ename->vla-object,命令欄就會出現no function,現在空閒時間比較少,沒法子全心的來測試,等後續有完整一點的成果,再貼出來跟大家分享.
這樣啊...可能是我的程式較簡單吧~
竊喜

____________________________________________________________________________________
avatar
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 17316
年齡 : 41
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 15↑
使用版本 : AutoCAD 2016
經驗值 : 65280
威望值 : 12865
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i11.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

回復: [討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 ginse0727 于 2016-03-10, 05:05

將程式下載後,在AutoCAD中載入下載的檔案
執行指令為dme
選取視埠,即可刪除模型空間中視埠外的圖元.
可搭配腳本使用做批次的刪除.
程式主要是自已整理圖檔要用到,
順便提供給大家參考看看.

以下回覆可見
avatar
ginse0727
高級會員
高級會員

文章總數 : 256
年齡 : 43
來自 : 台北巿
職業 : 帷幕牆
愛好 : 電玩,漫畫,網路小說
個性 : 宅男/正直/死腦筋
使用年資 : 退伍後工作迄今,10年以上
使用版本 : 2012
積分 : 14
經驗值 : 4285
威望值 : 492
發帖精華 : 1
注冊日期 : 2010-07-12
經典問與答讀者 藍鵲61號
2011聚會勳章 男 獅子座 虎

回頂端 向下

回復: [討論]以VBA或是LISP取得配置的視埠在模型空間裡對應的角點?

發表 由 ginse0727 于 2016-03-10, 21:02

Tiger&蘋果爸 寫到:
ginse0727 寫到:可能是我測試用的電腦,使用的CAD有問題,因為就算程式中已載入了(vl-load-com),執行到下列這段程式 vlax-ename->vla-object,命令欄就會出現no function,現在空閒時間比較少,沒法子全心的來測試,等後續有完整一點的成果,再貼出來跟大家分享.
這樣啊...可能是我的程式較簡單吧~
竊喜

蘋果爸你客氣了,我覺得好像是在win10 好像把visual lisp activex 的部份功能拿掉了,因為在公司用AutoCAD 2016,程式跑起來正常,可是在家裡測試就出問題了,
測試的條件只差別在作業環境是win10跟win7.

不過我還在確認到底是什麼原因. 火冒三丈
avatar
ginse0727
高級會員
高級會員

文章總數 : 256
年齡 : 43
來自 : 台北巿
職業 : 帷幕牆
愛好 : 電玩,漫畫,網路小說
個性 : 宅男/正直/死腦筋
使用年資 : 退伍後工作迄今,10年以上
使用版本 : 2012
積分 : 14
經驗值 : 4285
威望值 : 492
發帖精華 : 1
注冊日期 : 2010-07-12
經典問與答讀者 藍鵲61號
2011聚會勳章 男 獅子座 虎

回頂端 向下

上一篇主題 下一篇主題 回頂端


 
這個論壇的權限:
無法 在這個版面回復文章