Judge ET tool, if not installe

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

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

copy

 (if (findfile "acetutil.arx")

Problem has been resolved！

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

andy_lee,
with

copy

 (if (findfile "acetutil.arx")

you are only testing the file existence at your system, to test if loaded, try

copy

 (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

copy

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

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

Maybe something like this

copy

(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

发表回复

精选推荐