[Владимир М]

Вот обновил базу данных проката для швеллеров и уголков *.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

[TwoZero]

Начал трудиться буквально недавно, но скора думаю наклепаю хорошую (удобную) програмулину. 100% Результат будет, так как мне дали такое задание. На данный момент занимаюсь кодингом ОТРИСОВКИ, затем планирую создать рисунки к деталям, потом зделать возможность выбора точки вставки и поворота детали, ну и в дальнейшем 100% предется расширять базу.
(ИНТЕРФЕЙС НА ДАННЫЙ МОМЕНТ ЧИСТО ТЕСТОВЫЙ, В ДАЛЬНЕЙШЕМ ПЛАНИРУЕТСЯ СОЗДАТЬ БОЛЕЕ УДОБНЫЙ ИНТЕРФЕЙС С ВОЗМОЖНОСТЬЮ СОЗДАНИЯ СВОИХ НАБОРОВ, ДАПУСТИМ НЕКОТОРЫЕ КОНСТРУКТОРА РАБОТАЮТ ТОКА С ОДНИМИ ОПРЕДЕЛЕННЫМИ ДЕТАЛЯМИ ТАК ЗАЧЕМ ИМ ШАРИТЬ ПО ВСЕЙ БАЗЕ И ИСКАТЬ ИХ, БАЦ ДАБАВИЛИ В СВОЙ НАБОР И УСЕ ИСКАТЬ НЕНАДО :-) )

[TwoZero]

Выкладываю новый скрин программы :-)

Возможности программы на данный момент:
Прога умеет чертить Двутавры, Швелеры, Уголки.

Активно ведется разработка вставки блока по точки вставки (смотрите рисунок), также будет возможность поварачивать блок на 90 градусов (в дальнейшем будет предусмотренно отклонение по градусам :-) ), ну и конечно надо будет зделать вставку блока втом масштабе который стоит на чертеже. пока все, работаю...

[Jonas]

Уважаемые, ничего не получается!
Взял с поста 319, поставил, и при призапуске
^C^C_(if (= PRKT3D nil) ( Load (findfile "prcat3d.lsp"))) PRKT3D
пишет -

Команда: _(if Команда LISP недоступна.

Команда: (= PRKT3D nil) T

Команда: ( Load (findfile "prcat3d.lsp"))) ; ошибка: лишняя закрывающая скобка
на входе

Команда: PRKT3D
Неизвестная команда "PRKT3D". Для вызова справки нажмите F1.
; ошибка: Настройка переменной AutoCAD отвергнута: "aperture" nil

Хорошо, убрал и запускаю -

^C^C_(if (= PRKT3D nil) ( Load (findfile "prcat3d.lsp"))) PRKT3D

пишет -

Команда: _(if Команда LISP недоступна.

Команда: (= PRKT3D nil) T

Команда: ( Load (findfile "prcat3d.lsp")) _KPBLC-ERROR-CATCH

Команда: PRKT3D
Неизвестная команда "PRKT3D". Для вызова справки нажмите F1.
; ошибка: Настройка переменной AutoCAD отвергнута: "aperture" nil

Что делать??? Поставил потому что очень нужны замкнутые профили и такой облом

[TwoZero]

вопервых пропиши пути в самом акаде к папке с самим "прокатом" затем добавь все функции в меню tools->load application а уж затем запускай

[TwoZero]

в некоторых версиях проката требуется добавлять меню для этого надо зайти в tools->customize->interface а там уж и подгрузить само меню

[TwoZero]

у меня стоит "Программа ПРОКАТ (2d) загружена. Сборка 306 от 28.09.2007c:sbr"
работет обсалютно все

[Jonas]

Сообщение от TwoZero вопервых пропиши пути в самом акаде к папке с самим "прокатом" затем добавь все функции в меню tools->load application а уж затем запускай

Так все прописано как должно.

Проверил еще и еще и вот что:
слетают все привязки, "aperture" становиться "1" и вставка происходит черт знает куда.

[TwoZero]

aperture это системная переменная, в программе прокат она менят свое значение, но затем снова восстанавливает исходное значение.

Возможно у тебя проблемы в самой программе, системной переменной в данном случае банально неприсваевается исходное значение.

[TwoZero]

Если разбираешся в ЛИСПЕ проверь как программа работает с системными переменными.

[VVA]

Jonas,
Нужно не
^C^C_(if (= PRKT3D nil)( Load (findfile "prcat3d.lsp"))) PRKT3D
А так
^C^C(if (= PRKT3D nil)( Load (findfile "prcat3d.lsp")));PRKT3D;

[Jonas]

Сообщение от VVA Jonas, Нужно не ^C^C_(if (= PRKT3D nil)( Load (findfile "prcat3d.lsp"))) PRKT3D А так ^C^C(if (= PRKT3D nil)( Load (findfile "prcat3d.lsp")));PRKT3D;

Это уже я пробовал с подчеркиванием, работает по прежнему.

"APERTURE" меняется на "1" - бог с ним.
Наверно если бы "OSMODE" не слетало на "0" то все было бы в норме.

В Лиспе слаб и где происходит отключени не разглядел, во всяком случае понятно что при указании точки вставки (и следовательно завершении програмы) не возвращается первоначальное значение "OSMODE".

[VVA]

Немного модифицировал Procat 3d из сборки #319. Теперь OSMODE не должно слетать

[Jonas]

Сообщение от VVA Немного модифицировал Procat 3d из сборки #319. Теперь OSMODE не должно слетать

Да, теперь не слетает, спасибо.
Но осталась другая проблемка, не запрашивает точку вставки а ставит в 0,0 ПСК.
И еще вопрос, в 2Д другой (старый) список ГОСТов, та и должно?

[VVA]

Я не слежу за ГОСТами. Возьми сборку с не старыми ГОСТами и перепиши туда файл Prcat3d.lsp из #412
Ставит в 0,0 ПСК, а потом идет перенос и запрос новой точки.

[TwoZero]

Jonas, ГОСТЫ в разных канторах разные, это все зависит от нормаконтроля), в разных канторах разные погрешности и отклонения

[TwoZero]

Jonas, я так понимаю тебе прокат нужен, а почемубы тебе просто банально не ввести в камандой строке команду "PROKAT" ЭТО 2D ВЕРСИЯ.
2d версию я всегда так запускаю, вроде все пашет (относительно).
Или тебе нужен этот навароченый комплекс с созданным меню? мож я че нитак понял.

[Jonas]

Сообщение от TwoZero Jonas, я так понимаю тебе прокат нужен, а почемубы тебе просто банально не ввести в камандой строке команду "PROKAT" ЭТО 2D ВЕРСИЯ. 2d версию я всегда так запускаю, вроде все пашет (относительно). Или тебе нужен этот навароченый комплекс с созданным меню? мож я че нитак понял.

Вообще то для меня главное 3Д потому, что я разрабатываю конструкцию только в 3Д. 2Д пользуюсь редко и оно работает вот только после установки обновленной программы в 2Д остался прежний (что до обновления) набор профилей. Ну да ладно, не так важно.
Важно то о чем писал выше, не просит точку вставки!
Вчера дома поставил на свой ноутбук и там все зарабртало.
На рабочем, проверил сейчас (с утра) и к сожжалению то же, ставит в 0,0 ПСК. Может какая то переменная не в теме? ПОМОГИТЕ!

[TwoZero]

Сообщение от Jonas Вообще то для меня главное 3Д потому, что я разрабатываю конструкцию только в 3Д. 2Д пользуюсь редко и оно работает вот только после установки обновленной программы в 2Д остался прежний (что до обновления) набор профилей. Ну да ладно, не так важно. Важно то о чем писал выше, не просит точку вставки! Вчера дома поставил на свой ноутбук и там все зарабртало. На рабочем, проверил сейчас (с утра) и к сожжалению то же, ставит в 0,0 ПСК. Может какая то переменная не в теме? ПОМОГИТЕ!

Давай ты мне скиниш свою версию ПРОКАТА А Я ГЛЯНУ ЧТО ТАМ, МОЖЕТ НАЙДУ ОШИБКУ

[TwoZero]

Новый скрин программы "Сортамент стали".

[gipro]

TwoZero, интересно... А где остальные опции? где вид выбирать, длину вводить? Будет ли возможность отрисовки полилинией, как в "Прокате"?