HXChuxuecheng 发表于 2020-4-26 10:38:41

有啥新功能

zst1978 发表于 2020-8-15 02:38:39

谢谢啊，好好的

999999 发表于 2020-8-15 14:10:21

谢谢楼主的分享

xj6019 发表于 2020-8-15 17:41:56

楼主好，请教一下，你的中英文翻译的代码，怎么换语种呀，比方说我要换成中日互译怎么改呀，求赐教：
(defun Translate (word / RegEx str)
(setq RegEx (vlax-create-object "VBScript.RegExp"))
(vlax-put-property RegEx "Global" 1)
(setq str (GetXML (strcat "http://fanyi.youdao.com/translate?&i=" word "&doctype=xml&version")))
(vlax-put-property RegEx "Pattern" "^(.|\n)*<translation>(.|\n)*?<![\[]CDATA[\[]")
(setq str (vlax-invoke-method regex "Replace" str ""))
(vlax-put-property RegEx "Pattern" "[\]]{2}>(.|\n)*<\/translation>(.|\n)*$")
(setq str (vlax-invoke-method regex "Replace" str ""))
(vlax-release-object RegEx)
str
)

flyery 发表于 2020-8-17 12:27:49

谢谢！！！！！https://cdn.jsdelivr.net/gh/hishis/forum-master/public/images/patch.gif

czb203 发表于 2020-8-18 22:41:31

多谢楼主分享

kdanqu 发表于 2020-8-19 10:04:14

好像非常不错，下个试试

flyery 发表于 2020-8-20 08:25:09

必须所以lsp都加载还是只加载“工具箱面板总程序K.lsp”就可以？https://cdn.jsdelivr.net/gh/hishis/forum-master/public/images/patch.gif

KO你 发表于 2020-8-24 00:35:57

flyery 发表于 2020-8-20 08:25
必须所以lsp都加载还是只加载“工具箱面板总程序K.lsp”就可以？

LSP是要全部加载的，我有个VLX格式的是合并后的只有一个文件的，没放出来。发源码只是为了给需要的人用。

flyery 发表于 2020-8-24 10:13:56

KO你 发表于 2020-8-24 00:35
LSP是要全部加载的，我有个VLX格式的是合并后的只有一个文件的，没放出来。发源码只是为了给需要的人用。

那要怎么全部加载？麻烦发下vlxhttps://cdn.jsdelivr.net/gh/hishis/forum-master/public/images/patch.gif
页: 1 2 [3] 4 5 6 7
查看完整版本: 游茗杰CAD工具箱