本帖最后由 煮茗 于 2024-6-27 10:33 编辑
修改简化了下。无需sendkeys。直接利用命令行启动everything来搜索。
(startapp "C:\\Program Files\\Everything\\Everything.exe -s" txt)
是用命令行启动Everything.exe，-s参数表示搜索后面那个指定文本内容(拾取的文本)。
注意我的Everything.exe安装于【C:\Program Files\Everything\】目录下。
(defun C:TZ (/ TXT)
(if (setq txt (cdr (assoc 1 (entget (car (nentsel "\n 拾取搜索文本"))))))
(if (= (getenv "PROCESSOR_ARCHITECTURE") "x86");32位
(Everything32 TXT)
(Everything64 TXT)
)
)
(princ)
)
(defun Everything64 (TXT)
(startapp "C:\\Program Files\\Everything\\Everything.exe -s" txt)
)
(defun Everything32 (TXT)
(startapp "C:\\Program Files\\Everything\\Everything.exe -s" txt)
)
)
Everything命令行还有很多参数，比如”.txt content:<text>"用于搜索文件内含有指定文本内容的.txt文件，有兴趣的可以自行研究。
everything 还能这么用，大开眼界