Макрос - Сохранить как PDF.

[la_Mypka]

Добрый день.
Попробуйте из под админа зарегистрировать командой regsvr32 файл pdf2d.dll. Он лежит в папке Bin КОМПАС'а.

запустила от админа regsvr32 "C:\Program Files\ASCON\KOMPAS-3D v21\Bin\Pdf2d.dll"
вылезло следующее окно:

[la_Mypka]

а если запускать программу в самом PyScripter, в ПДФ сохраняет?

Не знаю, как это сделать. Я далека от программирования, максимум могу сделать по инструкции.
...
Разобралась, как запустить. При запуске макроса, записанного мной (сохраняла чертеж как pdf), ошибок не выдает, но и файл не сохраняет. Или мне неизвестно место сохранения; чертеж я сохраняла как pdf в той же папке, уже имеющийся файл pdf не обновляется.
...
Макрос выглядит следующим образом:

[Slaviation]

Добрый день.
Не вижу на скрине кода создания pdf. Может он дальше есть?
Попробуйте прилагаемый макрос. При необходимости замените имя pdf файла в строке 51 на требуемое.

[Петрович-47]

...Не вижу на скрине кода создания pdf...

Это нормальное явление для макрорекордера, я много раз пытался "сохранить как", но всегда получал только инициализацию а самого действа ни разу не было...
Отстой...

[la_Mypka]

Добрый день.
Не вижу на скрине кода создания pdf. Может он дальше есть?
Попробуйте прилагаемый макрос. При необходимости замените имя pdf файла в строке 51 на требуемое.

На скрине весь код, то, что Компас написал.
С помощью Вашего test получается следующая штука:

Появился еще вопрос: если/когда макрос заработает, так и придется каждый раз вручную указывать имя файла. Это занимает столько времени, что вся затея оказывается нерентабельной. Хотела по кнопке сохранять текущий чертеж в то же место как pdf.

[Slaviation]

Во второй строке выше от красной поменяйте компас с 23 на ваш.
Последнюю строку поменяйте на
converter.Convert(kompas_document.PathName + ".pdf", 0, False)

[la_Mypka]

Во второй строке выше от красной поменяйте компас с 23 на ваш.
Последнюю строку поменяйте на
converter.Convert(kompas_document.PathName + ".pdf", 0, False)

поменяла:


после нажатия на ОК:

[UU]

PathName - Полное имя документа.
Свойство доступно только для чтения. Возвращает полное имя файла документа, состоящее из пути, имени и расширения файла.
Может нужно сначала убрать старое расширение файла, а затем новое подпихивать?

[la_Mypka]

Может нужно сначала убрать старое расширение файла, а затем новое подпихивать?

В вашей фразе улавливаю мысль "ну тупая"))
Ответ на ваш вопрос - может, кто его знает... Повторюсь, я далека от программирования, сделала по "инструкции" уважаемого Slaviation

Попробовала в разных комбинациях - и cdw вписывала, и всяко-разно - не работает

[UU]

Во второй строке выше от красной поменяйте компас с 23 на ваш.
Последнюю строку поменяйте на
converter.Convert(kompas_document.PathName + ".pdf", 0, False)

Тут должно быть четыре параметра, а не три.

В вашей фразе улавливаю мысль "ну тупая"))
Ответ на ваш вопрос - может, кто его знает... Повторюсь, я далека от программирования, сделала по "инструкции" уважаемого Slaviation

Попробовала в разных комбинациях - и cdw вписывала, и всяко-разно - не работает

Смотрите внимательно справку.
https://help.ascon.ru/KOMPAS_SDK/23/ru-RU/iconverter_convert.html

[Михаил88]

В вашей фразе улавливаю мысль "ну тупая"))
Ответ на ваш вопрос - может, кто его знает... Повторюсь, я далека от программирования, сделала по "инструкции" уважаемого Slaviation

Попробовала в разных комбинациях - и cdw вписывала, и всяко-разно - не работает

Замените на эту строчку

converter.Convert('', kompas_document.PathName[:-4] + ".pdf", 0, False)

можете еще самой последней строчкой добавить

application.MessageBoxEx(kompas_document.PathName[:-4] + ".pdf" + "\n Документ сохранен успешно", '', 64)

[UU]

application.MessageBoxEx(kompas_document.PathName[:-4] + ".pdf" + "\n Документ сохранен успешно", '', 64)

application.MessageBoxEx(kompas_document.PathName[:-4] + ".pdf" + "\n Документ сохранен успешно", '', 64)
Где здесь используется возвращаемое значение этой - converter.Convert('', kompas_document.PathName[:-4] + ".pdf", 0, False) строки?
Она может и неуспешно выполнится.

[Михаил88]

name_file = kompas_document.PathName[:-4] + ".pdf"
rez = converter.Convert('', name_file, 0, False)
if rez == 1:
    application.MessageBoxEx(name_file + "\n Документ сохранен успешно.", '', 64)
else:
    application.MessageBoxEx(name_file + "\n Не удалось сохранить документ.", '', 64)

[Slaviation]

PathName - Полное имя документа.
Свойство доступно только для чтения. Возвращает полное имя файла документа, состоящее из пути, имени и расширения файла.
Может нужно сначала убрать старое расширение файла, а затем новое подпихивать?

Да, возможно старое расширение нужно убрать, но если есть несколько файлов, отличающихся только расширением, к примеру "Узел.cdw" и "Узел.spw", то при сохранении их в pdf они перезапишутся и в итоге останется один "Узел.pdf".
Если же старое расширение не убирать, то при сохранении в pdf файлов "Узел.cdw" и "Узел.spw" получим два файла "Узел.cdw.pdf" и "Узел.spw.pdf", которым старые расширения вроде и не мешают.

Да в последней строке пропущен первый параметр. Нужно
converter.Convert("", kompas_document.PathName + ".pdf", 0, False)
Коллеги, прошу извинить за эту неточность.

[la_Mypka]

Да в последней строке пропущен первый параметр. Нужно
converter.Convert("", kompas_document.PathName + ".pdf", 0, False)

не сработало

Замените на эту строчку

converter.Convert('', kompas_document.PathName[:-4] + ".pdf", 0, False)

Сработало! Файл успешно сохранился!

А теперь объясните мне, пожалуйста, как сделать так, чтоб окно PyScripter не появлялось, чтобы файл сохранялся просто по нажатию кнопки, к которой привязан макрос?

Изначальная цель была - уменьшить количество кликов мыши при сохранении файла в pdf.

[UU]

А теперь объясните мне, пожалуйста, как сделать так, чтоб окно PyScripter не появлялось, чтобы файл сохранялся просто по нажатию кнопки, к которой привязан макрос?

Сделать библиотеку dll(rtw).

[la_Mypka]

Сделать библиотеку dll(rtw).

Погуглила - работа в Visual Studio.
Может когда-нибудь и займусь.

Всем огромное спасибо за участие и терпение, насыпала благодарностей  

[la_Mypka]

На всякий случай прикрепляю работающий у меня макрос для 21-го компаса
test.zip

[Михаил88]

А теперь объясните мне, пожалуйста, как сделать так, чтоб окно PyScripter не появлялось, чтобы файл сохранялся просто по нажатию кнопки, к которой привязан макрос?

Изначальная цель была - уменьшить количество кликов мыши при сохранении файла в pdf.

Вам нужно изменить расширение файла с .cdm на .pyw.
Далее нужно через Открыть с помощью указать, чтобы открывало через pythonw.exe. Его расположение такое C:\ProgramData\ASCON\KOMPAS-3D\21\Python 3\App

[Михаил88]

не сработало

Будет работать если вы уберете лишние знаки.

Код Выделить Развернуть

converter.Convert("", kompas_document.PathName + ".pdf", 0, False)