明经CAD社区

 找回密码
 注册

扫一扫,访问微社区

QQ登录

只需一步,快速开始

查看: 3830|回复: 9

[讨论] 极速搜索Everything

  [复制链接]
发表于 2016-11-7 14:15 | 显示全部楼层 |阅读模式
本帖最后由 自贡黄明儒 于 2016-11-7 14:16 编辑

网友panliang9@sohu.com(2259433769)发给了我Everything,试了一下,速度相当快  我用了sendkeys 自动拾取文本,但存在一个问题,如果中文或者带有特殊符号就不行,各位高手可有更好办法?
  1. (defun C:TZ (/ TXT)
  2.   (if (setq txt (cdr (assoc 1 (entget (car (nentsel "\n 拾取搜索文本"))))))
  3.     (if        (= (getenv "PROCESSOR_ARCHITECTURE") "x86")            ;32位
  4.       (Everything32 TXT)
  5.       (Everything64 TXT)
  6.     )
  7.   )
  8.   (princ)
  9. )
  10. (defun Everything64 (TXT)
  11.   (startapp "Everything-1.4.1.773b.x64-Setup.exe")
  12.   (sendkeys txt)
  13. )
  14. (defun Everything32 (TXT)
  15.   (startapp "Everything1.3.4.686.x86.x64.exe")
  16.   (sendkeys txt)
  17. )
  18. (defun sendkeys        (keys)
  19.   (or *WSH* (setq *WSH* (vlax-get-or-create-object "wscript.shell")))
  20.   (vlax-invoke-method *WSH* 'sendkeys keys)
  21.   (princ)
  22. )

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

评分

参与人数 1金钱 +50 收起 理由
xyccf + 50 很给力!

查看全部评分

本帖被以下淘专辑推荐:

发表于 2017-10-29 16:35 | 显示全部楼层
everything的速度太快,简直是秒出结果,不过还没研究过lisp调用everything
发表于 2017-12-15 17:00 | 显示全部楼层
用了很多年了
发表于 2017-12-15 17:01 | 显示全部楼层
相当好用,还有一个多窗口软件Q-Dir,安全卫士里面好多
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号  
©2000-2017 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2017-12-19 04:25 , Processed in 0.155501 second(s), 32 queries , Gzip On.

Powered by Discuz! X3.3

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表