| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Обновление программы «Прокат» Василия Кондрата

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

Ответ
Поиск в этой теме
Непрочитано 05.12.2006, 18:24
Обновление программы «Прокат» Василия Кондрата
Владимир М
 
-
 
Ухта
Регистрация: 31.07.2005
Сообщений: 381

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

Вложения
Тип файла: zip prokat_ru_Bricscad8-10.zip (183.6 Кб, 1060 просмотров)
Тип файла: rar Procat_N458 от 16.12.2009.rar (117.8 Кб, 1353 просмотров)
Тип файла: zip Prokat568.zip (114.5 Кб, 2003 просмотров)

__________________
Я не волшебник, я только учусь…

Последний раз редактировалось Кулик Алексей aka kpblc, 05.03.2015 в 09:02.
Просмотров: 382922
 
Непрочитано 03.09.2010, 23:25
#541
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


Можно ли приспособить программу к Bricscad V10?
gomer вне форума  
 
Непрочитано 04.09.2010, 00:30
#542
Alan

CAD
 
Регистрация: 28.08.2003
Киев
Сообщений: 1,835
<phrase 1=


Цитата:
Сообщение от gomer Посмотреть сообщение
Можно ли приспособить программу к Bricscad V10?
Наверное можно. В ZWCAD я её адаптировал.
http://forum.zwsoft.ru/viewtopic.php?f=20&t=130
__________________
По теории майский жук летать не может.
Но он этого не знает. И летает...
Alan вне форума  
 
Непрочитано 04.09.2010, 00:48
#543
getr

Конструктор
 
Регистрация: 06.04.2005
Из тех ворот-откуда весь народ.
Сообщений: 356
<phrase 1=


после нескольких запусков окно программы перестало совсем появляться..методом тыка установил-что если в путях поддержки количество прописанных путей,стоящих перед путем до папки Procat, равно 24-м(путь к прокату является 25-м), то программа не работает,а если путь к Procat поднять выше например на 24-ое или на 23-е или совсем наверх,то все начинает нормально функционировать...все таки чертовщина присутствует или такова сущность автокада ..у меня стоит 2005eng.
__________________
"Мнение не бывает ни истинным, ни ложным, а лишь полезным в жизни или бесполезным. ",- Ауробиндо
И не надо делать удивленных движений руками.
getr вне форума  
 
Непрочитано 04.09.2010, 01:16
#544
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


Что значит открытые коды... Это мне линукс напоминает...
У программы есть большие жирные минусы... Как все работает не понятно... Собственно на Bricscad 10 не работает...
* функции отрисовки принимают данные глобально, а не через аргументы...
* Код можно и нужно оптимизировать (уменьшать, убирать лишнее)...
* Обилие переменных и функций от разных авторов
* Командные методы вперемешку с методами ActiveX
* что делает *error* не понятно...
и т.д.
gomer вне форума  
 
Непрочитано 04.09.2010, 09:09
#545
nikе

конструктор Лего
 
Регистрация: 21.10.2005
Краснодар
Сообщений: 204


Для Bricscad существует уже 2 года!
Вложения
Тип файла: zip prokat_ru_Bricscad8-10.zip (183.6 Кб, 273 просмотров)
nikе вне форума  
 
Непрочитано 04.09.2010, 12:45
#546
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


Спасибо заработало, но не сразу... только после принудительной записи в реестр... это не зер гут... ну да ладно...
gomer вне форума  
 
Непрочитано 04.10.2010, 06:09
#547
Jonas

конструктор машиностроитель
 
Регистрация: 14.05.2007
Новосибирск
Сообщений: 893


Ни как не работает "Крепежные изделия (Заполнение спецификации)".
Акад2008.
Пишет -
"Error:no function definition: T_S; ошибка: В функции *error* возникла
ошибка:Настройка переменной AutoCAD отвергнута: "CMDECHO" nil "
Jonas вне форума  
 
Непрочитано 04.10.2010, 13:42
#548
Alan

CAD
 
Регистрация: 28.08.2003
Киев
Сообщений: 1,835
<phrase 1=


Цитата:
Сообщение от Jonas Посмотреть сообщение
Ни как не работает "Крепежные изделия (Заполнение спецификации)".
Акад2008.
Пишет -
"Error:no function definition: T_S; ошибка: В функции *error* возникла
ошибка:Настройка переменной AutoCAD отвергнута: "CMDECHO" nil "
А разве "Крепежные изделия" мы в этой теме обсуждали?
__________________
По теории майский жук летать не может.
Но он этого не знает. И летает...
Alan вне форума  
 
Непрочитано 05.10.2010, 08:05
#549
Jonas

конструктор машиностроитель
 
Регистрация: 14.05.2007
Новосибирск
Сообщений: 893


Цитата:
Сообщение от Alan Посмотреть сообщение
А разве "Крепежные изделия" мы в этой теме обсуждали?
__________________
Я имею в виду это.
Миниатюры
Нажмите на изображение для увеличения
Название: Прокат.JPG
Просмотров: 223
Размер:	33.9 Кб
ID:	46106  
Jonas вне форума  
 
Непрочитано 05.10.2010, 11:12
#550
Alan

CAD
 
Регистрация: 28.08.2003
Киев
Сообщений: 1,835
<phrase 1=


Цитата:
Сообщение от Jonas Посмотреть сообщение
Я имею в виду это.
В данной теме обсуждался Прокат (2D&3D)...
Проверьте Поиском в Инете .
Василий Кондрат делал когда-то "Крепежные изделия".
Гляньте у Г.Поспелова http://www.kulichki.com/cadhlp/old/index.htm
А почему не работает программа в Вашем случае, спросите у того, кто делал это меню и собирал программы для него, или публикуйте тексты.
Но наверное это лучше сделать в новой теме.
__________________
По теории майский жук летать не может.
Но он этого не знает. И летает...
Alan вне форума  
 
Непрочитано 06.10.2010, 06:59
#551
Jonas

конструктор машиностроитель
 
Регистрация: 14.05.2007
Новосибирск
Сообщений: 893


Здесь задал вопрос потому, что из этой темы брал сборку 458.
Ну нет как нет.
Извините.
Jonas вне форума  
 
Непрочитано 06.10.2010, 11:24
#552
Alan

CAD
 
Регистрация: 28.08.2003
Киев
Сообщений: 1,835
<phrase 1=


Цитата:
Сообщение от Jonas Посмотреть сообщение
Здесь задал вопрос потому, что из этой темы брал сборку 458.
Ну нет как нет.
Извините.
Не за что извиняться
Но в сборке 458, если мне не изменяет память, нет программы "Крепежные изделия".
__________________
По теории майский жук летать не может.
Но он этого не знает. И летает...
Alan вне форума  
 
Непрочитано 07.10.2010, 05:37
#553
Jonas

конструктор машиностроитель
 
Регистрация: 14.05.2007
Новосибирск
Сообщений: 893


Цитата:
Сообщение от Alan Посмотреть сообщение
Но в сборке 458, если мне не изменяет память, нет программы "Крепежные изделия".
Зачем напрягать память, достаточно открыть пост #458 а там
Цитата:
Procat_N458 от 16.12.2009.rar (117.8 Кб, 265 просмотров)
Jonas вне форума  
 
Непрочитано 07.10.2010, 13:53
#554
Alan

CAD
 
Регистрация: 28.08.2003
Киев
Сообщений: 1,835
<phrase 1=


Цитата:
Сообщение от Jonas Посмотреть сообщение
Зачем напрягать память, достаточно открыть пост #458 а там Procat_N458 от 16.12.2009.rar
В котором нет программы "Крепежные изделия", о которой Вы спрашиваете.
P.S.Или я чего-то не понимаю
__________________
По теории майский жук летать не может.
Но он этого не знает. И летает...
Alan вне форума  
 
Непрочитано 09.10.2010, 06:15
#555
Jonas

конструктор машиностроитель
 
Регистрация: 14.05.2007
Новосибирск
Сообщений: 893


Цитата:
Сообщение от tyusau Посмотреть сообщение
А можно по-подробнее? Что это за программа?
Вот она. Правда ваша Alan, не то. И не помню кто подарил. Уверен был до сих пор что из поса #458.
Вложения
Тип файла: rar Procat_N458.rar (838.1 Кб, 134 просмотров)
Jonas вне форума  
 
Непрочитано 09.10.2010, 11:23
#556
sbi


 
Регистрация: 27.04.2008
SPB
Сообщений: 3,285
Отправить сообщение для sbi с помощью Skype™


Тема: Обновление программы Василия Кондрата "Крепеж" есть на форуме
http://forum.dwg.ru/showthread.php?t=41532
Может и поможет.
__________________
С уважением sbi
sbi вне форума  
 
Непрочитано 09.10.2010, 12:03
#557
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


Почему бы не сделать вместо:

Код:
[Выделить все]
  (setq	dvcl   (findfile "d_vtr.dcl")
	lib    (findfile "procat.slb")
	dvdp   (findfile "dvtp.dat")
	dvdpas (findfile "dvtpas.dat")
	dvd    (findfile "dvtr.dat")
	dvd1   (findfile "dvtr2.dat")
	dvd2   (findfile "dvtp2.dat")
	svrd   (findfile "svlr.dat")
	svpd   (findfile "svlrp.dat")
	svgd   (findfile "svlrg.dat")
	svgkd  (findfile "svlrgK.dat")
	ugrd   (findfile "ugrp.dat")
	uggrd  (findfile "ugrg.dat")
	uggrkd (findfile "ugrgK.dat")
	uggnd  (findfile "ugng.dat")
	uggnkd (findfile "ugngK.dat")
	ugnd   (findfile "ugnp.dat")
	trkvd  (findfile "trkv.dat")
	trpud  (findfile "trpu.dat")
  ) ;_ конец setq

(defun name_fil ()
      (cond
	((eq pr_fl "0") (setq fil dvdp))
	((eq pr_fl "1") (setq fil dvdpas))
	((eq pr_fl "2") (setq fil dvd))
	((eq pr_fl "3") (setq fil dvd1))
	((eq pr_fl "4") (setq fil dvd2))
	((eq pr_fl "5") (setq fil svrd))
	((eq pr_fl "6") (setq fil svpd))
	((eq pr_fl "7") (setq fil svgd))
	((eq pr_fl "8") (setq fil svgkd))
	((eq pr_fl "9") (setq fil ugrd))
	((eq pr_fl "10") (setq fil ugnd))
	((eq pr_fl "11") (setq fil uggrd))
	((eq pr_fl "12") (setq fil uggrkd))
	((eq pr_fl "13") (setq fil uggnd))
	((eq pr_fl "14") (setq fil uggnkd))
	((eq pr_fl "15") (setq fil trkvd))
	((eq pr_fl "16") (setq fil trpud))
      ) ;_ end of cond
    )
так вот:
Код:
[Выделить все]
  (setq
	dvcl (findfile "d_vtr.dcl")
	lib  (findfile "procat.slb")
	datfiles
	'("dvtp.dat"
	  "dvtpas.dat"
	  "dvtr.dat"
	  "dvtr2.dat"
	  "dvtp2.dat"
	  "svlr.dat"
	  "svlrp.dat"
	  "svlrg.dat"
	  "svlrgK.dat"
	  "ugrp.dat"
	  "ugrg.dat"
	  "ugrgK.dat"
	  "ugng.dat"
	  "ugngK.dat"
	  "ugnp.dat"
	  "trkv.dat"
	  "trpu.dat"
	)
  )

(defun name_fil ()
   (setq fil (findfile (nth (atoi pr_fl) datfiles)))
)
Кода меньше в 3 раза и можно избавиться от 16 переменных сразу...
Таких мест в программе много, так как программа написана на древнекитайском мелкософтовском диалекте...
По поводу версии для брикскад и Procat_N458: куча мусора в архиве... так низя!
gomer вне форума  
 
Непрочитано 09.10.2010, 12:32
#558
Alan

CAD
 
Регистрация: 28.08.2003
Киев
Сообщений: 1,835
<phrase 1=


Цитата:
Сообщение от Jonas Посмотреть сообщение
Вот она. Правда ваша Alan, не то. И не помню кто подарил. Уверен был до сих пор что из поса #458.
Для того чтобы не было разночтения, огромная просьба переименовать вложение в посте N556 хотя бы в "Procat_И_Крепеж".
Также наверное надо учесть замечание gomer " куча мусора в архиве..."

>VVA ИМХО Работающая сборка "Procat_N458 от 16.12.2009" остается в посте N458.
Её и поддерживаем до внесения следующих корректировок по предложению пользователей.
__________________
По теории майский жук летать не может.
Но он этого не знает. И летает...

Последний раз редактировалось Alan, 09.10.2010 в 12:56.
Alan вне форума  
 
Непрочитано 09.10.2010, 12:55
#559
Хмурый


 
Регистрация: 29.10.2004
СПб
Сообщений: 16,326


интересно, что при неправильном выходе из программы Prokat иногда слетает привязка Сenter в 2008-ом Eng,
Хмурый вне форума  
 
Непрочитано 09.10.2010, 12:59
#560
Alan

CAD
 
Регистрация: 28.08.2003
Киев
Сообщений: 1,835
<phrase 1=


Цитата:
Сообщение от Хмурый Посмотреть сообщение
интересно, что при неправильном выходе из программы Procat иногда слетает привязка center в 2008-ом
В этой программе не стоит обработчик ошибок.
Со всеми вытекающими отсюда последствиями...
__________________
По теории майский жук летать не может.
Но он этого не знает. И летает...
Alan вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Обновление программы «Прокат» Василия Кондрата

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск