社区 › Auto Lisp › Judge ET tool, if not installe

andy_lee 发表于 2022-7-5 23:01:37

Judge ET tool, if not installe

Sometimes, some routine need ET ,
If routine call command is "test" , so call "test" , frist, judge ET,if not installed , Pop-up prompts.

Snownut 发表于 2022-7-5 23:09:32

Just what is ET, a LISP program, .net application, need more information.

ymg3 发表于 2022-7-5 23:12:40

Snownut,
 
Express Tools
 
How aout simply issuing command EXPRESSTOOLS
 
ymg

andy_lee 发表于 2022-7-5 23:18:09

(if (findfile "acetutil.arx")
 
Problem has been resolved！

hmsilva 发表于 2022-7-5 23:27:14

 
andy_lee,
with

(if (findfile "acetutil.arx")
you are only testing the file existence at your system, to test if loaded, try

(if (member "acetutil.arx" (arx))
HTH
Henrique

andy_lee 发表于 2022-7-5 23:29:30

 
Thank you so much!hmsilva, That's good!

hmsilva 发表于 2022-7-5 23:39:37

You're welcome, andy lee!
Glad I could help
 
Henrique

andy_lee 发表于 2022-7-5 23:43:35

 
Good friend!
 
Could like this

(if (or (member "acetutil.arx" (arx)) (and (findfile "acetutil.arx")(arxload "acetutil.arx")))

hmsilva 发表于 2022-7-5 23:48:12

Maybe something like this

(if (not (member "acetutil.arx" (arx)));; test if loaded (if (findfile "acetutil.arx");; if not, test if find   (arxload "acetutil.arx");; if find, load   (prompt "\n\"acetutil.arx\" wasn't found on the system!!!");; prompt    ) (prompt "\n\"acetutil.arx\" was already loaded!!!");; prompt )
 
HTH
Henrique

andy_lee 发表于 2022-7-5 23:56:04

 
Without such redundancy . Thank a lot!

查看完整版本: Judge ET tool, if not installe