Обновление программы «Прокат» Василия Кондрата

Владимир М · 05.12.2006, 18:24

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

Геннадий aka PG · 30.07.2007, 10:58

Чем меньше "юэверь" имеет возможность залезть в прогу - тем лучше. А то потом такие вопли начнуться, что -то не работает.

Евгений А. · 30.07.2007, 11:36

->Alan А я и не спорю про квалификацию, просто я предлагал это сделать ещё в 149 посте, но понял так, что это никому не нужно, вот и

на счёт большинства. По-моему, никто просто не хочет лезть в код (муторное это дело), максимум что делается - это пополняется база проката и то, далеко не большинством!

Программа растёт, но не развивается...
(Возможно это и правильно - у программы должен быть конкретный автор, а то она просто развалится, если все её будут править под себя.)

Alan · 30.07.2007, 21:26

>All
Любимое выражение всех программистов: "Программа практически готова!"

Кое что изменил, учел некоторые мнения некоторых коллег (Кулик Алексей aka kpblc, AY, VVA и др.).
По принципу: "Мы тут посовещались и я решил!"

внёс исправления.
Исправил в текстах, что уж очень бросалось в глаза.
Но есть у всех программистов еще один закон: "Контрольный пример всегда идёт!"
Выкладываю тексты (читай Read-Me.txt)
Требуются тестировщики.

Вот брёвнышко. Поработайте товарисчи!
[ATTACH]1185964807.rar[/ATTACH]
P.S. Изменения внесены пока только в 2D.
Осталась неясность с толщиной/цветом пунктирной линии. Перевел в тот же слой/цвет. Владимир М тоже смотрит. Жду предложений.
Как только придут результаты от тестеров, внесу в Prcat3d.lsp

Владимир М · 01.08.2007, 01:47

И еще незабудьте поменять макросы:
изменены файл поиска загрузки файла ALANом
(if (= PROKAT nil) ( Load (findfile "prokat.lsp"))) PROKAT
(if (= PRKT3D nil) ( Load (findfile "prcat3d.lsp"))) PRKT3D
Тестил команду PROKAT все работает
Вот только зря поменял цвет пунктирной линии красная ведь - есть хорошо - многие люди выводят на печать используя настройки цвета
Одно это меня сильно раздражает
Может добавить выбор цвета невидимой линии, как для выбора слоя?

G.A.W. · 01.08.2007, 10:34

Вроде все работает.
Кстати согласен с Владимир М. насчет выбора цвета в диалоговом окне. Хотя после этого захочется и чтоб был выбор типа линий.

Alan · 01.08.2007, 10:57

Цитата:

Сообщение от G.A.W.

...Кстати согласен с Владимир М. насчет выбора цвета в диалоговом окне. Хотя после этого захочется и чтоб был выбор типа линий.

Вот, вот...
"И что-нибудь еще и что-нибудь иное, о чём ни говорят, чему не учат в школе!"

Кулик Алексей aka kpblc · 01.08.2007, 11:04

Что возвращает к необходимости окна настроек

Alan · 01.08.2007, 11:10

Цитата:

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

Что возвращает к необходимости окна настроек

Не делая нового окна, я добавил выбор слоя вставки в существующее.

Что еще надо?
Задание начальных установок:
слои, стили и т.д. и т.п., не входят в прикладную программу вставки блока проката. ЯТД
Давайте сделаем слой PUNKTIR, предположим красного цвета?

Кулик Алексей aka kpblc · 01.08.2007, 11:15

Ага, а потом появится еще один товарищ, которому слово "PUNKTIR" как кость в горле. Или тип линии ему нужен для осей не center, а my_cool_linetype_for_axes. И что, по новой все перелопачивать?

G.A.W. · 01.08.2007, 11:18

И снова просьба.
Я уже обращался и к Alanу и к Алексею, и сам Алексей об этом упоминал в посте № 211, с просьбой о том, чтобы профили рисовались полилиниями, и не отдельными сегментами, а чтобы полилиния была замкнута. И если можно, то сделать вариант, в котором отказатся от блоков (раскатал губенки-то!!!!!!)

Кулик Алексей aka kpblc · 01.08.2007, 11:20

Так я делал, но проблемы с dcl и полилиниями (вот уж чего-чего, а этого не ожидал совершенно!) нарисовались "не сотрешь"

Alan · 01.08.2007, 11:22

Цитата:

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

Ага, а потом появится еще один товарищ, которому слово "PUNKTIR" как кость в горле. Или тип линии ему нужен для осей не center, а my_cool_linetype_for_axes. И что, по новой все перелопачивать?

Меня больше интересует политическое значение этого вопроса.
Появляется новый слой в блоке, где все сделано в слое "0" и вставляется в выбранный слой.
Правильно ли это? Хотелось бы услышать мнение ShaggyDoc'a и др.коллег (список прилагается

).
ИМХО В принципе, в билиотеках прикладных блоков (по специальностям) я так делаю.
>kpblc Что касается того товарисча со слоем my_cool_linetype_for_axes. Нормально, у него такой СТП!
Тексты открытые, красный флаг в руки...

Геннадий aka PG · 01.08.2007, 11:28

Может я не в списке

, но скажу свое ИМХО: чем меньше слоев тем лучше!
Чем можно оправдать необходимость создания отдельного слоя для осей (например)?
Только типа все осевые в своих слоях, а смысл?
зато при необходимости отключить слой "проката" придется отключать еще какие то слои.

Alan · 01.08.2007, 11:28

Цитата:

Сообщение от G.A.W.

И снова просьба.
Я уже обращался и к Alanу и к Алексею, и сам Алексей об этом упоминал в посте № 211, с просьбой о том, чтобы профили рисовались полилиниями, и не отдельными сегментами, а чтобы полилиния была замкнута. И если можно, то сделать вариант, в котором отказатся от блоков (раскатал губенки-то!!!!!!)

Подожди! Но в 3D там полилинией. Ты так хочешь и в 2D?
Сам потихоньку замени _LINE на _PLINE.
В письме, на которое Вы мне кажется не ответили, :wink: я вроде подробно всё описал.

Alan · 01.08.2007, 11:36

Цитата:

Сообщение от Геннадий aka PG

Может я не в списке

, ...

А куда же ты денешься!

Цитата:

Чем можно оправдать необходимость создания отдельного слоя для осей (например)?
Только типа все осевые в своих слоях, а смысл?
зато при необходимости отключить слой "проката" придется отключать еще какие то слои.

Если профили вставлять в слой "СК_металл", то заморозив его, мы заморозим и.... Догадался? Слой "PUNKTIR".

G.A.W. · 01.08.2007, 12:13

Цитата:

Сообщение от Alan

Подожди! Но в 3D там полилинией. Ты так хочешь и в 2D?

Вот именно, что хочу и в 2D. Люблю больше полилинии, чем блоки. Для меня их легче редактировать в случае чего, а в "в случае чего" бывает часто!

Цитата:

Сам потихоньку замени _LINE на _PLINE.
В письме, на которое Вы мне кажется не ответили, :wink: я вроде подробно всё описал.

Вот в чем и проблема. Переделал "_Line" на "_PLine"? но... Как и сказал Алексей куча проблем. Например, по какой то причине, так как в лиспе продвигаюсь очень медленно, то не знаю по какой, отрисовка происходит полилинией, но не замкнутой (1-ый мой камень, если есть желание подскажите как его сдвинуть). Потом, при вычерчивании сечения есть команда, такая как "_arc", что после взрыва блока дает дугу. И как ее превратить в полилинию, да еще соеденить с остальными и все это сделать, вернее вставить в тот же лисп (для каждого профиля свой), не знаю. Поэтому прошу помощи, подсказки :roll:

VVA · 01.08.2007, 13:58

>Alan В сборке с поста №223 отсутствует procat.slb. Пол обеда потратил, пока разобрался, почему вылетает
> ALL По поводу полилинией в 2d. Чобы не разбираться в отрисовке, внес изменения в файл prokat.lsp в ф-цию clip_bl, которая отрисованный набор запихивает в блок. Перед этим этот набор peditm'ом преобразовываю в полилинию. Соответствующие ф-ции добавлены
Сделал 2 варианта
prokat.lsp - вставка блоком
prokat1.lsp - вставка с последующим расчлененим
Отличия в двух файлах в ф-ции clip_bl в 2-х строчках
(command "._insert" edat3 pause 1 1 pause) ;_prokat.lsp и prokat1.lsp
(command "_explode" (entlast)) ;_ prokat1.lsp

*** Обновлен архив
[ATTACH]1185964295.rar[/ATTACH]

G.A.W. · 01.08.2007, 14:16

Большое спасибо заработало!
Но...
Толи я ослеп, толи.... Но "Prokat1.lsp" я в архиве не нашел. Есть, я так понял исходник "Prokat_В.lsp" и папка с исходниками. Мож я чо туплю?!

VVA · 01.08.2007, 14:32

Туплю я. Обновил архив в посте № 227

Alan · 01.08.2007, 14:33

Цитата:

Сообщение от VVA

>Alan В сборке с поста №223 отсутствует procat.slb. Пол обеда потратил, пока разобрался, почему вылетает

Извини, что не дал пообедать

Огромное спасибо за диагностику.

Цитата:

> ALL
По поводу полилинией в 2d. Чобы не разбираться в отрисовке, внес изменения в файл prokat.lsp в ф-цию clip_bl, которая отрисованный набор запихивает в блок. Перед этим этот набор peditm'ом преобразовываю в полилинию. Соответствующие ф-ции добавлены
Сделал 2 варианта
prokat.lsp - вставка блоком

Мне всё равно: отрезок или полилиния в блоке. А ты так интеллигентненько выкрутился

И волки сыты и овцы целы! Огромное спасибо за работу.

Цитата:

prokat1.lsp - вставка с последующим расчлененим
Отличия в двух файлах в ф-ции clip_bl в 2-х строчках
(command "._insert" edat3 pause 1 1 pause) ;_prokat.lsp и prokat1.lsp
(command "_explode" (entlast)) ;_ prokat1.lsp

Категорически против расчленения в программе. Не для того блоки делаются, чтобы тут же расчленять.
"Архинеправильно, батеньки!", как говаривал наш бывший вождь и учитель.
Любителей расчлененку к позорному столбу. [sm3305]
> ALL
В конце дня выкладываю сборку с этими исправлениями (пока 2Д).
И слоем ПУНКТИР?