<<*** TT就可以選物件隱藏，空選則顯示全部，... ***>>>

趣意人生

谢谢楼主分享！

Wanda

感谢大师分享

KO你

lee50310 发表于 2021-12-17 16:08
這樣改 只能 單選 或 框選(多選: 按滑鼠左鍵拖曳) 就一次選取機會
的確省了一個按Enter步驟
但不能跳著 ...

一楼的多选已经接近我的需求，就是操作步骤优化后怎样能实现多选还是一个难题，期待最终版出炉

lee50310

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你

lee50310 发表于 2021-12-25 18:03
多選改單選 很簡單呀!
我5 樓不是有回答了修改方法嗎?
用文字編輯器編輯 程式

可能我说的不清楚，我要的还是多选功能，意思是操作步骤少点操作，减少一次确定还能多选。

lee50310

KO你 发表于 2021-12-25 18:08
可能我说的不清楚，我要的还是多选功能，意思是操作步骤少点操作，减少一次确定还能多选。

這沒辦法 用多選 指令 就是要 按 Enter 告訴程式要 結束選取
否則  程式怎麼知道你下一步的動作 是要繼續選還是要結束呢 ?

KO你

lee50310 发表于 2021-12-25 18:14
這沒辦法 用多選 指令 就是要 按 Enter 告訴程式要 結束選取
否則  程式怎麼知道你下一步的動作 是要繼 ...

海龙工具就可以这样操作，但找不到程序海龙工具还有一个移动填充功能很实用，大家可以探讨一下
http://bbs.mjtd.com/forum.php?mo ... 5MzI%3D&#172;humb=yes

lee50310

KO你 发表于 2021-12-25 18:37
海龙工具就可以这样操作，但找不到程序海龙工具还有一个移动填充功能很实用，大家可以探讨一下
http://b ...

這個功能不同 不能混為一談
你這個是在圖形上點選滑鼠左鍵 就全選圖  然後拉出一段距離 再點擊就是移動圖形的距離 這不難
況且你這個也不能跳著一個一個選呀!

所謂多選就是可一次框選 也可跳著 一個一個點選
請問你 跳著選了5個 不想選  ,不按Enter告訴程式要結束選取
程式還是認定你還要選取呀!
lisp指令只有單選跟多選 這兩種可選擇, 你想要多選又不想多按一個 Enter
很抱歉! 並沒有這種指令語法

xiaocainiao

大神、想请教一下、这个程序能不能改成和海龙隐藏功能一样的效果

1.输入TT后提示选择对象、如果选择对象并空格一次就直接隐藏对象

2.输入TT后提示选择对象、此时不选择对象并输入T切换到隔离对象模式、按完T后再选择对象并空格一次、直接隔离所选对象

不知道能不能实现上面的效果

lee50310

xiaocainiao 发表于 2021-12-25 19:15
大神、想请教一下、这个程序能不能改成和海龙隐藏功能一样的效果

1.输入TT后提示选择对象、如果选择对象 ...

很抱歉! 我沒用過海龍隱藏

不過看你敘述內容 第1點與原先的功能相同
只是  第二點的功能與原先的相比 我看不出有優勝原先的功能呀!