Valera
размещено: 29 Марта 2006
обновлено: 19 Декабря 2007
Распакуйте и разместите куда хотите.
В автокаде создайте кнопку :
^C^C^P(command "_-vbarun" "C:/ACAD/VB/Calc/calc.dvb!Module1.MyCalc")
Вместо [C:/ACAD/VB/Calc/] - вставте свой путь к файлу
Моя система: Win2000/acad2005
Граф-калькулятор работает в немодальном режиме, т.е. его можно не закрывать в течение всего сеанса АКАДа. При закрытии, позиция запоминается. Калькулятор работает в прозрачном режиме, т.е. вычисления можно производить, находясь в процессе выполнения команды АКАДа. Калькулятор позволяет и обратные вычисления (напр. - при известных произведениии и множителе - найти др. множитель).
На текущий момент граф-калькулятор работает со след. граф. примитивами: текст, мтекст, размеры, линия, полилиния, окружность, дуга, эллипс, регион, сплайн, 3д-солид (объем,масса,длина цилиндра), блоки(количество), обекты ABS и ADT - трубы, стены, балки, лестницы. В калькуляторе реализована работа с КОПИЛКОЙ (памятью – “М+” и “М-”). Вычисленные значения можно передавать обратно объектам АКАДа.
Ведется ЛОГ вычислений. Результаты из граф- и мат-калькулятора копируются в буфер с автоматической заменой “,” на “.” (что удобно при вставке в командную строку). Мат-калькулятор может взять с чертежа для вычислений – 2d- и 3d-дистанцию, дистанцию по X, дистанцию по Y, дистанцию по Z, угол (в градусах или радианах).
История:
6.10.05 - v.01a - первый выход в свет
24.10.05 - v.02a
+При закрытии, позиция запоминается.
+Добавлен МАТЕМАТИЧЕСКИЙ калькулятор
-Исправлены выявленные ошибки и очепятки
27.10.05 - v.03a
- Исправлена ошибка при изменении знака числа с плавающей точкой
- Результат из мат-калькулятора копировался в буфер с лидирующим пробелом
+ Увеличена точность вычислений за счет разграничения типов данных. Decimal - для чисел от 0.0000000000000000000000000001 до 79228162514264337593543950335; Double - от 7.92281625142643E28 до 1.79769313486232E308
+ Возможность выхода из мат-калькулятора с автоматическим помещением результата в буфер обмена
+ Добавлены 2 кнопки – “Измерить 3d-дистанцию” и “Измерить смещение по оси Z”
24.03.2006 - v.1a
Много чего добавил и изменил...
Добавил также возможность передачи вычисленных значений обратно объектам АКАДа (редактирование).
29.03.2006 - v.1.1a
- исправил ошибку - при добавлении группы объектов добавлялись не их значения, а количество объектов.
06.02.2007 - v.1.2a
+ Добавлена поддержка лестниц (объект ADT "stair" - считывание и редактирование длины, высоты и УГЛА наклона).
+ Мелкие улучшения. Проверена работоспособность под ADT-2007 (работает :)
!!!!!! - 19.12.2007 - !!!!!!
Закрываю проект с 31.12.2007.
Если кто имеет конкретные коммерческие предложения,
шлите: v.mitronin@mail.ru
тема: Другой графический калькулятор для ACADa
-----------------------------
0.2 МБ
СКАЧАТЬ
Комментарии
Авторизоваться
Не запускается калькулятор в ACAD2006, у некоторых работал а потом отказался, а штука хорошая. Что делать?
вылетает акад с фатальной ошибкой! Спасите, классная была штука!
(можно сохранить в 123.reg и запустить)
[HKEY_CURRENT_USERSoftwareVB and VBA Program SettingsOtherGrafCalcUser]
"X=ord"="380,25"
"Y=ord"="461,25"
"Height"="83,5"
"Width"="435,75"
"label2"="+"
"ButVisible"="False"
"But2Visible"="False"
"OptionButton1"="True"
"OptionButton2"="False"
"Text_txt"="True"
"Text_h"="False"
"Solid_Vol"="True"
"Solid_Mass"="False"
"Solid_Cilindr"="False"
"Text_koef"="0,000000001"
"Text_plotn"="7850"
"Text_diam"="57"
"Arc_lg"="True"
"Arc_R"="False"
"Arc_S"="False"
"Wall_L"="True"
"Wall_H"="False"
"Stair_A"="True"
"Stair_H"="False"
"Stair_L"="False"
"Check_select"="True"
"Check_Sound"="True"
"CheckBox1"="True"
"TBox1"="\A1;"
"CheckBox2"="False"
"TBox2"="{\fRomanS|b0|i0|c204|p2;"
"CheckBox3"="False"
"TBox3"="}"
"CheckBox4"="False"
"TBox4"="%%c"
"Mass_Vol"="True"
"Mass_Mass"="False"
"TextM_koef"="1"
"TextM_plotn"="7850"
"Plin_Lg"="True"
"Pline_S"="False"
[HKEY_CURRENT_USER\Software\VB and VBA Program Settings\OtherGrafCalc\User]