鱼与熊掌 发表于 2015-1-25 10:21:59

加强版SSGET ENTSEL

本帖最后由 鱼与熊掌 于 2015-1-25 10:31 编辑

飞总的SSGET给我很多启发,让我学到知识。
某天我整理函数的时候发现有一些美中不足,于是做了一些优化。

;《《《《《《《《《《《《《《《》》》》》》》》》》》》》》》

函数:;(cx-SsgetNum "测试选数字" nil "")   只选择数字的文本。
参数:msg提示字符串。
cps:pik选项可以用::s或者:e等关键字。
kwd :关键字选项,可以输入1 2 3 4 (initget)

;《《《《《《《《《《《《《《《》》》》》》》》》》》》》》》

函数:;;带关键字的ssget(cx-ssget "选择文字[(m)多选/(d)恢复/]<结束>" "m d"'((0 . "*text")))
说明:来自飞总的原来的函数。

;《《《《《《《《《《《《《《《》》》》》》》》》》》》》》》

;带过滤的超级单选。
;(cx-entsel "选择直线" "S 3" nil)
参数1:msg提示信息
参数2:关键字 S 或者3(initget)
参数3:过滤选项 如:'((0 . "LINE"))

;《《《《《《《《《《《《《《《》》》》》》》》》》》》》》》

;函数;(cx-SsgetSup "选择文字[(m)多选/(d)恢复/]<结束>" ":s""m d"nil)
;参数1:提示信息
;参数2 ::S :E 等CPS选项
;参数3:关键字
;参数4:过滤

;可以在函数的基础上拓展更多有趣的写法。这里不一一列举












yjtdkj 发表于 2021-7-6 17:06:25

最好举个例子,我这里运行也不通顺

JHX948954875 发表于 2021-4-27 21:36:02

谢谢楼主分享插眼

Kekukele8403 发表于 2020-10-5 15:14:53

不错,可没币了。这日子过的

qiguangyao 发表于 2015-1-25 12:44:19

分享的都死好样的,学习下

bzhjl 发表于 2015-1-25 13:43:36

加油加油~赞一个

qiguangyao 发表于 2015-1-25 15:14:00

分享的都死好样的,学习下

叶曲冰寒 发表于 2015-6-30 10:19:36

分享的都死好样的,学习下

ddbegg 发表于 2015-8-23 07:46:59

感谢分享,受益匪浅

laiz3000 发表于 2015-8-23 14:28:16

学习一下

hodnes 发表于 2016-5-6 14:39:31

谢谢分享,学习学习

LIULISHENG 发表于 2016-5-6 17:16:27

真心不错的

xman00 发表于 2019-5-12 23:45:51

学习,膜拜,顶
页: [1] 2
查看完整版本: 加强版SSGET ENTSEL