CAD БИБЛИОТЕКА
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Корректное добавление путей в настройки Автокада (проверка существования пути)

Корректное добавление путей в настройки Автокада (проверка существования пути)

Ответ
Поиск в этой теме
Непрочитано 22.09.2020, 14:52 #1
Корректное добавление путей в настройки Автокада (проверка существования пути)
olga87
 
Регистрация: 28.05.2007
Сообщений: 142

Здравствуйте Уважаемые программисты!

Код ниже добавляет путь "C:\\Приложения" в зону доверенных местоположений в настройках Автокада.
Но когда этот же путь НО в другом регистре (т.е. "C:\\приложения") уже есть в настройках, то путь добавляется повторно (получается два одинаковых пути).
Подскажите пожалуйста, как исправить код ниже, чтобы исключить повторного добавления пути, если он уже присутствует в настройках?
Спасибо!

Код:
[Выделить все]
(defun AddTrustedPath (newPath / trusted)
  (setq trusted (getvar "trustedpaths")
  (if (not (vl-string-search newPath trusted)) (setvar "trustedpaths" (strcat (vl-string-right-trim ";" trusted) ";" newPath)))
  (princ)
)
(AddTrustedPath "C:\\Приложения")
Просмотров: 522
 
Непрочитано 22.09.2020, 15:23
#2
koMon


 
Регистрация: 26.09.2017
Сообщений: 848


(vl-string-search (strcase newPath) (strcase trusted))
koMon вне форума  
 
Непрочитано 22.09.2020, 16:02
#3
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 37,819


Ну или wcmatch (тоже с приведением символов в единый регистр).
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 22.09.2020, 20:51
#4
olga87


 
Регистрация: 28.05.2007
Сообщений: 142


Спасибо!
olga87 вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Корректное добавление путей в настройки Автокада (проверка существования пути)

Система Техэксперт дает уверенность в правильности и эффективности принимаемых инженерных решений!
Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Долго появляется окно настройки Автокада rtyu AutoCAD 29 14.12.2020 12:26
Где хранятся настройки Автокада ? vladimir19 AutoCAD 7 27.09.2017 09:48
Глюк автокада при построении линий командами сценария pwn Программирование 15 05.11.2016 23:37
Настройку Автокада, загрузку ресурсов и пр. настройку файлов сделать программно АлексЮстасу Программирование 1 12.05.2014 05:56
3d моделирование зданий. поиск наикротчайшего пути. sasha_nt Разное 6 18.06.2008 18:24