趣意人生
发表于 2021-12-20 22:32:14
谢谢楼主分享！
Wanda
发表于 2021-12-23 08:39:39
感谢大师分享
KO你
发表于 2021-12-25 17:18:05
lee50310 发表于 2021-12-17 16:08
這樣改 只能 單選 或 框選(多選: 按滑鼠左鍵拖曳) 就一次選取機會
的確省了一個按Enter步驟
但不能跳著 ...
一楼的多选已经接近我的需求，就是操作步骤优化后怎样能实现多选还是一个难题，期待最终版出炉
lee50310
发表于 2021-12-25 18:03:46
本帖最后由 lee50310 于 2021-12-25 18:10 编辑
KO你 发表于 2021-12-25 17:18
一楼的多选已经接近我的需求，就是操作步骤优化后怎样能实现多选还是一个难题，期待最终版出炉
多選改單選 很簡單呀!
我5 樓不是有回答了修改方法嗎?
用文字編輯器編輯 程式 tt5_chs.lsp 或 tt6_chs.lsp
找到主程式
;;<<<--- 主程式 --->>>
(defun c:tt( / ss )
(princ "\n選對象 按Enter 隱藏，空選則顯示全部，選中對象按T就孤立")
(if (setq ss (ssget )) ;修改此行 把他 改為(if(setq ss (ssget ":s")) 然後存檔即可
(progn
(if (= (f:keydown "\n按Enter隱藏 或 按T就孤立 : ") 116);判斷按T鍵
.
就變成你想要的 單選
KO你
发表于 2021-12-25 18:08:14
lee50310 发表于 2021-12-25 18:03
多選改單選 很簡單呀!
我5 樓不是有回答了修改方法嗎?
用文字編輯器編輯 程式
可能我说的不清楚，我要的还是多选功能，意思是操作步骤少点操作，减少一次确定还能多选。
lee50310
发表于 2021-12-25 18:14:49
本帖最后由 lee50310 于 2021-12-25 18:23 编辑
KO你 发表于 2021-12-25 18:08
可能我说的不清楚，我要的还是多选功能，意思是操作步骤少点操作，减少一次确定还能多选。
這沒辦法 用多選 指令 就是要 按 Enter 告訴程式要 結束選取
否則程式怎麼知道你下一步的動作 是要繼續選還是要結束呢 ?
KO你
发表于 2021-12-25 18:37:29
本帖最后由 KO你 于 2021-12-25 18:41 编辑
http://bbs.mjtd.com/forum.php?mod=attachment&aid=MTAzMDkxfGVhZmUxNzZlfDE2NDA0Mjg3MzV8NzMyNjY2NnwxNzg5MzI%3D¬humb=yeslee50310 发表于 2021-12-25 18:14
這沒辦法 用多選 指令 就是要 按 Enter 告訴程式要 結束選取
否則程式怎麼知道你下一步的動作 是要繼 ...
海龙工具就可以这样操作，但找不到程序海龙工具还有一个移动填充功能很实用，大家可以探讨一下
http://bbs.mjtd.com/forum.php?mo ... 5MzI%3D¬humb=yes
lee50310
发表于 2021-12-25 19:04:09
本帖最后由 lee50310 于 2021-12-26 07:43 编辑
KO你 发表于 2021-12-25 18:37
海龙工具就可以这样操作，但找不到程序海龙工具还有一个移动填充功能很实用，大家可以探讨一下
http://b ...
這個功能不同 不能混為一談
你這個是在圖形上點選滑鼠左鍵 就全選圖然後拉出一段距離 再點擊就是移動圖形的距離 這不難
況且你這個也不能跳著一個一個選呀!
所謂多選就是可一次框選 也可跳著 一個一個點選
請問你 跳著選了5個 不想選,不按Enter告訴程式要結束選取
程式還是認定你還要選取呀!
lisp指令只有單選跟多選 這兩種可選擇, 你想要多選又不想多按一個 Enter
很抱歉! 並沒有這種指令語法
xiaocainiao
发表于 2021-12-25 19:15:25
大神、想请教一下、这个程序能不能改成和海龙隐藏功能一样的效果
1.输入TT后提示选择对象、如果选择对象并空格一次就直接隐藏对象
2.输入TT后提示选择对象、此时不选择对象并输入T切换到隔离对象模式、按完T后再选择对象并空格一次、直接隔离所选对象
不知道能不能实现上面的效果
lee50310
发表于 2021-12-25 19:45:06
本帖最后由 lee50310 于 2021-12-26 07:45 编辑
xiaocainiao 发表于 2021-12-25 19:15
大神、想请教一下、这个程序能不能改成和海龙隐藏功能一样的效果
1.输入TT后提示选择对象、如果选择对象 ...
很抱歉! 我沒用過海龍隱藏
不過看你敘述內容 第1點與原先的功能相同
只是第二點的功能與原先的相比 我看不出有優勝原先的功能呀!