[===AAA===]

Всем привет!

Забавный вопрос - не правда ли?

(getvar "dwgprefix") - чем не устаивает? :-)

Не спешите.

Если запустить nanoCAD + открыть файл из *.bat-файла командой типа:

start "DREAM-START" "C:\Program Files\Nanosoft\nanoCAD x64 23.1\nCad.exe" "0-str2.dwg"

То nanoCAD запустится и файл откроется, но (getvar "dwgprefix") выдаст "0-str2.dwg".

Т.е. результат (getvar "dwgprefix") = (getvar "dwgname")

Вопрос:

а) Как можно гарантированно получить путь папки файла альтернативно, т.е. не читая "dwgprefix"

или

б) Какой строкой *.bat-файла можно запустить nanoCAD + открыть указанный файл,
чтобы в "dwgprefix" был-таки путь папки, а не имя файла.

Конечно, если путь будет в явном виде указан в строке,

start "DREAM-START" "C:\Program Files\Nanosoft\nanoCAD x64 23.1\nCad.exe" "C:\Путь\0-str2.dwg"

то этот C:\Путь\ попадёт в "dwgprefix" ... но это опять же "частный случай",
хотелось бы решения "в общем виде".

И да - в AutoCAD'е этого глюка нет.

[Сергей812]

если нет официального ТЗ и разработка ПО не являются прямыми должностными обязанностями - просто проверил бы наличие прямого и обратного слеша в имени файла и выдал предупреждение пользователю. Стоит ли столько времени тратить на нахождение путей обхода чужих косяков...

[===AAA===]

и разработка ПО не являются прямыми должностными обязанностями

Я так отдыхаю. :-)

А ларчик-то просто открывается, оказывается. Только что нашёл:

(findfile (getvar "dwgname"))

даёт полный путь к файлу, загруженному даже таким вот своеобразным батником.

[Сергей812]

Сообщение от ===AAA=== findfile

вроде же только в прописанных в настройках *кад каталогах ищет

[doctorraz]

Сообщение от Сергей812 вроде же только в прописанных в настройках *кад каталогах ищет

автокад ищет по путям поиска
нана вдобавок ищет в текущем каталоге
не обязательно файла dwg

[Сергей812]

но текущий каталог можно и из окружения получить - круг замкнулся)

[doctorraz]

Сообщение от Сергей812 но текущий каталог можно и из окружения получить - круг замкнулся)

Offtop:

в нанокад можно провернуть такую фигню невозможную в автокад
(все файлы лежат не по путям поиска)
загружаем первый лисп по полному пути
этот лисп может загружать другие лиспы по относительным путям относительно своего файла
из любого лиспа можно перезагрузить самого себя просто по имени файла без пути

Код:

[Выделить все]

 
(defun c:зз ()
  (load "comNana");comNana.lsp
  (princ)
) ;_enddefun

----- добавлено через ~24 мин. -----

Сообщение от ===AAA=== А ларчик-то просто открывается, оказывается. Только что нашёл: (findfile (getvar "dwgname"))

главное, чтобы одноименный файл в путях поиска или C:\\Program Files\\Nanosoft\\nanoCAD x64 23.1\ не оказался)))

[Кулик Алексей aka kpblc]

Сообщение от doctorraz автокад ищет по путям поиска нана вдобавок ищет в текущем каталоге не обязательно файла dwg

кад сначала ищет в каталоге текущего документа, потом уже лезет в каталоги поиска. Как оно в нанике - без понятия

[doctorraz]

Сообщение от Кулик Алексей aka kpblc Как оно в нанике

Наоборот очевидножэж)))

[===AAA===]

главное, чтобы одноименный файл в путях поиска или C:\\Program Files\\Nanosoft\\nanoCAD x64 23.1\ не оказался)))

Да я уже по-всякому его погонял... Одноимённые файлы
из разных папок открывал в разной последовательности,
разных сеансах и разных копиях запущенного нано.

Пока без сбоев - выдаёт путь именно того файла, в ком. строку
которого вводишь эту команду.

Т.е. алгоритм действий такой - читаем dwgprefix, если там этих
самых префиксов "\\" нет - лезем узнавать их из findfile.