> 1 <

Автор Сообщение

olgag

Members


Статус

1 сообщений

Где: Russia
Род занятий:
Возраст:

#8468   2020-10-01 00:32 GMT+3 часа(ов)      
Здравствуйте Уважаемые программисты!

Подскажите пожалуйста как кодом (Lisp Autocad2020) выполнить следующее:

1) Посмотреть какие пути к палитрам в настройках Автокада, т.е. "exPath",
2) Записать все эти пути в файл TXT с условием: исключить пути "C:\путь1" и "C:\путь2" (если таковые есть в "exPath") и исключить дублирование записей в TXT.
! В "exPath" пути (если их несколько) перечислены через ";". Лучше возможно при экспорте в txt заменить этот разделитель на переход на новую строку?

Заранее спасибо!

(setq exPath (vla-get-toolPalettePath (vla-get-files (vla-get-preferences (vlax-get-acad-object)))))
(setq path_list (list "C:\путь1" "C:\путь2"))
 
(if (setq file (open "C:\MyPaths.txt" "a"))
(progn
(write-line exPath file)
(close file)
)
)
> 1 <


Онлайн :

0 пользователь(ей), 41 гость(ей) :




Реклама на сайте: