[Владимир М]

Вот обновил базу данных проката для швеллеров и уголков *.dat; но вот в чем проблема!
Для швеллеров гнутых ГОСТ 8278-83 и уголков гнутых равнополочного ГОСТ 19771-93 и неравнополочного ГОСТ 19771-93 меняется номенклатура профиля для обычной и качественной стали, т.е к обновленной базе добавил еще дополнительную svlrgk.dat; ugrgk.dat; ugngk.dat. И поменял диалоговое окно, добавив опцию «выбор стали»
И вот не как не получается связать выбор с этими кнопками!
[ATTACH]1165331931.JPG[/ATTACH]
===
Добавлено 13.02.2009:
К сожалению, автор ветки последнее время на ней не появляется. Последняя актуальная сборка находится здесь.
Просьба разработчикам: при изменении писать мне или Солидворкеру в личку с указанием поста, где выложена сборка.
/kpblc/

Последняя работающая версия от VVA : http://forum.dwg.ru/showpost.php?p=352714&postcount=458
Версия от gomer : http://forum.dwg.ru/showpost.php?p=637272&postcount=568
Версия для BricsCAD : http://forum.dwg.ru/showpost.php?p=621028&postcount=545

При некорректной работе попробуйте совет из #777

[VVA]

> MB должно. Там ничего запретного не делали
Вариант с "пометкой" примитивов. Если подвести мышу, то напомнит № профиля и ГОСТ
Включенеи/отключение показа гиперссылок см. команды
_HYPERLINKOPTIONS (ГИПЕРСВОЙСТВА)
[ATTACH]1186057813.rar[/ATTACH]

[G.A.W.]

Сообщение от Alan ....Владимир М и др., я жду мыслей по поводу цвета/слоя пунктирной линии.

Я за то чтобы отображалось:

Свойства
слой вставки ______
цвет невидимой линии ______
тип невидимой линии ______

Причом чтобы слой вставки был как для блоков, так и для полилиний (последнее замечание не мое, а коллеги. Мне все равно, т.к я черчу в одном слое "0")

[VVA]

Послендий (мой) вариант.
Добавлена команда NPZ - номер позиции
Считывает вычерченный PROKAT'ом профиль.
Можно использовать просто как чертилку.
По умолчанию настороена на использование шрифта http://dwg.ru/dnl/147
Если не надо, то переименовать файл prokat_V1.lsp в prokat.lsp


*** Изменено: 03.08.2007 Полилиния на заданный слой
[ATTACH]1186126077.rar[/ATTACH]

[Владимир М]

VVA, заметил при вставке проката полилинией, слой при любом раскладе будет 0. Дело в коде не учли для полилинии, для блока все нормально!

[G.A.W.]

Нормально то нормально, но если блок взорвать, тоже будет "0"

[ALL]

[Не пашет программа в Механикал 2007
Загружается нормально, окошко выбора профилей появляется, после выбора профиля и нажатия OK вываливается с сообщением:

Command: prokat
; error: ActiveX Server returned an error: Error loading type library/DLL

Command:
PROKAT ; error: ActiveX Server returned an error: Error loading type library/DLL

[cater]

Ай да VVA! Ай да сукин сын. Огромадное МЕРСИ.

Идеи Кондрата Василия жиыут и побеждают. Ура, товарищи!

[VVA]

Нормально то нормально, но если блок взорвать, тоже будет "0"

А вместо _Explode выполнить _XPLODE не пробывали?
Взамен первой буквы добавили много чего вкусного

[G.A.W.]

Тогда для отрисовки профиля полилинией, нужно изменить команду "_explode" на "_xplode" с подкомандой "расчленить по объекту". Не знаю как!

[VVA]

> Подправил для полилиний в посте 263.

Тогда для отрисовки профиля полилинией, нужно изменить команду "_explode" на "_xplode" с подкомандой "расчленить по объекту". Не знаю как!

И я не знаю. Команда не встроенная автокадовкая, а внешняя. Через command не вызовешь. Вызовешь так (C:XPLODE), но не передашь агрументы :twisted: Сделал по старинке, перебором

[AlexCondor]

Не надо другую команду, просто слой в котором рисуются примитивы должен соответствовать слою выбранном для вставки
Т.е. переход на слой должен быть до того как создаются объекты
Догда разблокирование их сбросит на слой где они созданы.

Да еще хотелось бы, что-бы по-умолчанию был выбран текущий слой а не 0.

[ALL]

Сообщение от ALL [Не пашет программа в Механикал 2007 Загружается нормально, окошко выбора профилей появляется, после выбора профиля и нажатия OK вываливается с сообщением: Command: prokat ; error: ActiveX Server returned an error: Error loading type library/DLL

Нашел, как победить. Нужно загружать не prokat.lsp, а prokat_B.lsp.
Не работают кнопки :вставить блоком, полилинией, масштаб, но остальное пашет как надо. Вставляет блоком, как и было у Кондрата.

[VVA]

>ALL prokat_B.lsp старая (backup) версия prokat'a. Отличие, что стали (наверное я добавил) использовать visual lisp (vl* ф-ции) их подгрузка осуществляется ф-цией (vl-load-com), библиотека хранится в tlb файле.
Это наверное кривовато стал механикл. Похожая тема http://www.autocad.ru/cgi-bin/f1/board.cgi?t=1067PO
Попробуй всавить это в командную строку и выполнить

Код:

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

(vl-load-com)(vla-get-activedocument (vlax-get-acad-object))

>AlexCondor Дело в том, что лезть глубоко внуть в чужой лисп и разбираться что к чему ни у кого нет ни желания, ни времени. Поэтому доработка идет по принципу черного ящика: есть что-то на входе и выходе. Так вот на выходе у нас блок, созданный правильно: все объекты на 0 слое и цветом по-блоку (наверное). Отсюда и пляшем

[ALL]

Сообщение от VVA >Это наверное кривовато стал механикл. Похожая тема http://www.autocad.ru/cgi-bin/f1/board.cgi?t=1067PO Попробуй всавить это в командную строку и выполнить Код: [Выделить все] (vl-load-com)(vla-get-activedocument (vlax-get-acad-object))

Вряд ли кривовато. Лицензионный, встал без проблем.
Строчку (vl-load-com)(vla-get-activedocument (vlax-get-acad-object)) вставил, выполнил. Результат тот же: не пашет.
Почитал тему http://www.autocad.ru/cgi-bin/f1/board.cgi?t=1067PO , поискал у себя файл acdb16.dll. Такого файла нет. Спросил у соседа. У него тоже нет.
Может в разной конфигурации по-разному ставится? У нас Инвентор 11 комплектом. Может когда Механикс ставится с Инвентором это файл заменяет другой?

[VVA]

Значит Меканикл в составе Инвентор или наборот не поддкрживают visual lisp. раз лицензионный - уточни у дилера

[Владимир М]

VVA, а можно при способе вставке профиля в падающей строке масштаба указать масштабы вместо 1; 5; 10; 15; 20; 25; 50 поставить
1:100; 1:75; 1:50; 1:40; 1:25; 1:20; 1:15; 1:10; 1:5; 1:4; 1:2,5; 1:2; 1:1; 2:1; 2,5:1; 4:1; 5:1; 10:1; 20:1; 40:1; 50:1; 100:1, что согласно ГОСТ 2.302-68

[G.A.W.]

Коль уж в этой теме приведствоваются предложения по улучшению программы, не знаю правда улучшение это или нет (как говорится все новое враг хорошего), да и Алексей это тоже предлогал (всмысле осевая линия), так вот есть такое предложение:
[ATTACH]1186379675.JPG[/ATTACH]

[G.A.W.]

DCL типа этого
[ATTACH]1186379769.rar[/ATTACH]

[VVA]

> Можно, но нужно будет применять специальные меры, чтобы "разобрать" строчки 1:100 и т.п. Как быстрый выход предлагаю сделать 2 действия
1. В файле d_vtr.dcl найди строчку "Масштаб" и замени на "Масштаб 1:"
2. В файле prokat.lsp найди строку

Код:

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

  (setq LMashtab '((1 1) (5 1)(10 0.5)(15 0.5)(20 0.4)(25 0.3)(50 0.2))) ;; VVA 02.08.2007 Список масштабов

Это список списков масштабов, где 1-е число масштаб, второе масштаб типа линии
Масштаб вставки блока получается делением, поэтому масштабы 2:1,5:1 и т.п. не пойдут
Не пойдет и 2.5, т.к выпадающий список заполняется с помощью itoa.
А все, что осталось, пожалуйста

Код:

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

  (setq LMashtab '((1 1)(2 1)(4 1)(5 1)(10 0.5)(15 0.5)(20 0.4)(25 0.3)(40 0.2)(50 0.2)(75 0.2)))

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

[G.A.W.]

И еще так же как и для 3D в гиперсвойствах чтоб обозначалась масса в зависимости от длины при вычерчивании вида сверху, главного вида, вобщем все видов кроме сечения. Легче спецификации заполнять, навел посмотрел записал. Правда если это возможно!