[===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'е этого глюка нет.

[doctorraz]

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

никак
т.е. если ты запустил ком строку в каталоге с 0-str2.dwg
и запустил нану "C:\Program Files\Nanosoft\nanoCAD x64 23.1\nCad.exe" "C:\Путь\0-str2.dwg"
то нана не знает полный путь...
проверить легко, посмотреть Файл-свойство чертежа..
Расположение будет "\"
((
а вот на .NET легко

[===AAA===]

Похоже, что всё-таки "знает", т.к. если сделать команду
"Сохрани как...", nanoCAD услужливо откроет именно ту папку,
где лежит открытый файл DWG.

Причём *.bat-файл можно запускать из любой папки /проверил/,
прописывая к нему полный путь доступа, перед этим попрыгав
менеджером по разным папкам, чтобы "текущей" в системе была
точно "другая" папка.

Не, "сбить с толку" не получается. Оно "знает", где этот файл лежит.

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

и запустил нану "C:\Program Files\Nanosoft\nanoCAD x64 23.1\nCad.exe" "C:\Путь\0-str2.dwg" то нана не знает полный путь...

Опять же "знает" и спокойно раскладывает "C:\Путь\0-str2.dwg" по двум системным
переменным - dwgprefix и dwgname.

[doctorraz]

Код:

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

 
Document doc = Application.DocumentManager.MdiActiveDocument;
string sFilName = doc.Name;

хех возвращает только имя файла(((

если просто save, тоже пересохранит))
----------------
всежэж он не знает полный путь и сохраняет тупо по относительному... средствами ОС
то что на
(getvar "dwgprefix")
возвращает имя файла, имха бага
-------------
должен вернуть
\\

[===AAA===]

И (vla-get-path ...) - тоже только имя.

Бага-бяка. :-(

[doctorraz]

так вернет директорию

Код:

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

 string curDir=System.IO.Directory.GetCurrentDirectory();

[Сергей812]

Сообщение от doctorraz Document doc = Application.DocumentManager.MdiActiveDocument;2string sFilName = doc.Name;

а если через документ Document.Database.FileName попробовать?

[doctorraz]

string value = HostApplicationServices.WorkingDatabase.Filename
Вернет имя файла с расширением
Offtop: Нанодевы не подумали, что пытливые пользователи будут открывать файлы без пути))

----- добавлено через ~11 мин. -----
батник меняет рабочий каталог наны
и

Код:

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

 string value = HostApplicationServices.WorkingDatabase.Filename ; //->0-str2.dwg
bool isFilExist = File.Exists(value );// ->true

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

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

с полным путем
типа так
*.bat

Код:

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

FOR /r %%A IN (*dwg) DO ( 
echo Processing %%A
rem
"C:\Program Files\Nanosoft\nanoCAD x64 22.0\nCadS.exe" "%%A" -b nSPDSComp -r SPDS -a nanoCAD_x64_SPDS_22.0 -invisible -k "c:\BAT\cleanNano\cleanNano.scr" -oleid "{E42052C9-250A-483B-B353-E0C90517FD7F}"
)

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

перед запуском пакетной обработки выполнить этот *.vbs

Код:

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

 
Set objApp = GetObject(, "nanoCAD.Application")
If objApp.Visible = False Then
    objApp.Visible = True
Else
    objApp.Visible = False
    End If

а по окончании еще раз
PS действует на первый запущенный нана

[===AAA===]

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

Это не для перебора. :-)

Просто у меня на Enter назначено открытие DWG в Автокаде, вот и сделал
маленький батник, чтобы быстро открывать в нане "отладочный файл" из
"текущей папки". И тут же получил багу. :-)

А когда "мельтешит окошками", то в асаде даже хорошо. Юзер запустил и
сидит, картинки смотрит, как оно там рисует - жизни радуется.
Ну у что, что подольше.

Затрат времени на рубль, удовольствия - на все сто. :-)

[doctorraz]

Сообщение от ===AAA=== А когда "мельтешит окошками", то в асаде даже хорошо.

можно жэж другим делом заняться... косынку разложить)))

Сообщение от ===AAA=== батник, чтобы быстро открывать в нане "отладочный файл" из "текущей папки". И тут же получил багу. :-)

полный путь передавай
Offtop: в клубе разработчиков тишина, абонент не абонент, то ли их всех уволили, то ли загрузили по самое не балуй
эт я к тому, что надеяться тут можешь только на себя

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

Offtop: Сугубо ИМХО - стоит все же сначала запускать приложение, а потом уже из-под него открывать файлы. Научен горьким опытом под акадом, когда у тебя под десяток профилей с различными настройками )

[doctorraz]

в качестве костылика под эту грабельку
дополнить батник скриптом
типа

Код:

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

filedia 0
enter
saveas
enter
да
filedia 1

тогда путь появится)))
Хотя проще всего поправить батник, чтобы он нане передавал полный путь

[===AAA===]

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

Для себя-то чего - добавил путь в батник и не жужжу.

А вот насчёт "save as" интересно. Возможно, путь в
dwgprefix может появиться и после какого-то другого
события/команды. Надо поискать.

Кстати, если не лень, поотслеживайте пошагово, как
меняется значение в dwgname при создании нового
файла. Удивитесь. Там в какое-то время появляется и
исчезает имя шаблона. :-)

[doctorraz]

Сообщение от ===AAA=== Удивитесь

Да лаааднаа, его жэж не ветром надуло.. Из шаблона и создается

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

Сообщение от ===AAA=== не могу отследить, как именно пользователь будет открывать файл

На моей памяти ты первый так придумал!!!
Напиши в саппорт про баг, может и поправят

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

Сообщение от ===AAA=== Возможно, путь в dwgprefix может появиться и после какого-то другого события/команды

Не может
По saveas. Он тупо сохраняет файл по пути окружения которое ты ему батником установил.. Т.е. этот каталог какбэ корневой. Путь походу уже добивает система, в нане его нет и неоткуда взяться

[doctorraz]

Код:

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

             Document doc = Application.DocumentManager.MdiActiveDocument;
            Editor ed = doc.Editor;            

            //ful name
            string sFilName = doc.Name;

            sFilName = Path.GetFullPath(sFilName);//затычка если файл открыт по относительному пути

            string sSaveDir="";

            McUtilServise.RegistryMod rm = new McUtilServise.RegistryMod();

            bool isFilExist = File.Exists(sFilName);
            if (isFilExist)
            {
                sSaveDir = Path.GetDirectoryName(sFilName);
            }
            retun sSaveDir ;

теоретически можно оформить в лисп функцию, но нана их умеет начиная с нк24

[===AAA===]

Попробовал SaveAs.

Тоже не вариант.

а) Если сохранить открытый файл 01.dwg, как 02.dwg - всё О'К,
путь в "dwgprefix" появится.

б) Если попробовать сохранить открытый файл 01.dwg, как 01.dwg
(т.е. "самого в себя"), то nanoCAD просто не даст это сделать. Скажет, что
файл открыт другим процессом, не желая узнавать в нём себя, любимого. :-)

[doctorraz]

Сообщение от ===AAA=== Если попробовать сохранить открытый файл 01.dwg, как 01.dwg (т.е. "самого в себя"), то nanoCAD просто не даст это сделать. Скажет, что файл открыт другим процессом, не желая узнавать в нём себя, любимого. :-)

не подтверждаю, без проблем перезаписывает открытый самим собой файл

[===AAA===]

Ну, не скрин же мне прикладывать...
Версия 23.1 - заерепенилась у меня.

----- добавлено через ~5 мин. -----
Вот текст из окна:

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

и "красный крестик" слева от сообщения. :-)

----- добавлено через ~8 мин. -----
Это если в батнике в явном виде не прописать путь к открываемому файлу.
Если прописать - то всё ОК. Но тогда и первоначальной проблемы тоже нет.

[doctorraz]

Сообщение от ===AAA=== Ну, не скрин же мне прикладывать... Версия 23.1 - заерепенилась у меня. ----- добавлено через ~5 мин. ----- Вот текст из окна: Файл .... открыт для редактирования в другом сеансе или другим пользователем, поэтому не может быть замещен и "красный крестик" слева от сообщения. :-)

если просто открыть файл и сохранитькак под этим жэж именем, дает?
смотри свой батник из под кого и как запускаешь нано
-------------
так запускаю

Код:

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

D:\setup\Desktop>"C:\Program Files\Nanosoft\nanoCAD x64 23.1\nCadS.exe" "-b" "nSPDSComp" "-r" "SPDS" "-a" "nanoCAD_x64_SPDS_23.1" "-oleid" "{7AF4B577-859C-4090-ACA4-95C07064A10B}" Без имени0.dwg

при соханить как просто запрос на перезапись и перезаписывает

[===AAA===]

если просто открыть файл и сохранитькак под этим жэж именем, дает?

Да, конечно даёт.

Если в батнике строка

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

т.е. "без пути", то сохратиться как "сам-в-себя" - не даёт.

[Сергей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.