[功能] 取文字中的数字

自贡黄明儒

;;[功能] 取文字中的数字 By 自贡黄明儒
;;http://bbs.mjtd.com/thread-107150-1-1.html中定义xd::string:regexps
;;示例(HH:GetStrNumber "5.4a2.32c")，返回("5.4" "2.32")
(defun HH:GetStrNumber (str)
  (xd::string:regexps "(\\d+)?[.]?(\\d+)+" str "")
)

自贡黄明儒

soly2006 发表于 2013-10-9 14:02
这是晓东吗？呵呵

在我心中，晓东和明经是一家人

soly2006

这是晓东吗？呵呵

自贡黄明儒

soly2006 发表于 2013-10-9 14:02
这是晓东吗？呵呵

XD就是代号，为什么就一定是晓东呢？
自从XDSoft提倡字符串处理用正则以来，我就逐渐学习它，习惯了，我一直用XD开头。
其实《"一刀屠文"对字符串进行正则表达式测试及替换-by 梁雄啸》早在明经上发表了，我也早看到，就是没有人提倡，一直觉得深不可测,其好处认识不够。

soly2006

自贡黄明儒 发表于 2013-10-9 14:16
在我心中，晓东和明经是一家人

大师莫鸡动，在我心中，也是泛爱者。
像你这样的高手，在哪都希望那骷髅坦克出现,我们才切实学习与受益，呵呵