Перейти к публикации

Сделай свою работу в Solidworks эффективнее


Рекомендованные сообщения

Это только у меня не работает? Вроде никто такую проблему здесь не озвучивал.

У меня все нормально на 2005 сп4. Ошибки не возникает. Опишите более подробно свои действия.
Ссылка на сообщение
Поделиться на других сайтах


У меня все нормально на 2005 SP4. Ошибки не возникает

На 2007 СП4.0 все ОК

Baron & Мишутка видно стоит обновиться

Ссылка на сообщение
Поделиться на других сайтах

На 2007 СП4.0 все ОК

Baron & Мишутка видно стоит обновиться

У меня тоже последнее обновление, SW2007 SP4

Опишите более подробно свои действия.

В понедельник опишу все поэтапно, щас нет сабжа под рукой )))
Ссылка на сообщение
Поделиться на других сайтах

Опишите более подробно свои действия.

Описывать вообщемто нечего, т.к. стандартные действия по изменению размера. Выделяем размер => запускаем макрос => ставим галочку для режима "в две строки" => пишем во второй строке => нажимаем сохранить и закрыть => далее проблема.

Все остальное работает

Сегодня утром sw, после попытки заполнить вторую строку, вообще стал вылетать (см.фото)

В чем может быть проблема?

p/s/

windowsXPsp2

post-7210-1191213142_thumb.jpg

Ссылка на сообщение
Поделиться на других сайтах

Мишутка

Лучше покажите скрин, когда запускается дебагер. И в какой строке ошибка. Тогда можно что-нидь придумать.

Ссылка на сообщение
Поделиться на других сайтах

Лучше покажите скрин, когда запускается дебагер. И в какой строке ошибка. Тогда можно что-нидь придумать.

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

А вобще при ручном вводе текста под линией солид не выпадает, по крайне мере у меня, но выдаёт ошибку:

Private Sub CommandButton1_Click() ' Сохранить

If OptDim.Value = True Then

	cop = DimProp.SetText(swDimensionTextPrefix, vbNullString) 'На этой строчке ошибка Automation Error

...
Ссылка на сообщение
Поделиться на других сайтах

да, дебагер не появляется, но 2 раза вылезает окно с runtime error

Выяснилось вот что:

если размер сделать "обычным отверстием" с некоторым кол-вом и в две строки, затем нажать применить, то запись на чертеже получется в две строки. Если после этого перейти в "простые размеры" и нажать "применить", то знак диаметра на поле чертежа превращаеться в Ш, но изменяя текст нижней строки получаем его и в чертеже. Как только знак диаметра убираем (стираем) в окне RecordDim - солид ругается runtime error-ом и вываливается.

Ссылка на сообщение
Поделиться на других сайтах

да, дебагер не появляется, но 2 раза вылезает окно с runtime error

Выяснилось вот что:

если размер сделать "обычным отверстием" с некоторым кол-вом и в две строки, затем нажать применить, то запись на чертеже получется в две строки. Если после этого перейти в "простые размеры" и нажать "применить", то знак диаметра на поле чертежа превращаеться в Ш, но изменяя текст нижней строки получаем его и в чертеже. Как только знак диаметра убираем (стираем) в окне RecordDim - солид ругается runtime error-ом и вываливается.

Вызвать ошибку мне так и не удалось. Проделывал все то что вы описали. После таких издевательств знак диаметра действительно изменяется, но не на Ш а на значок диаметра из шрифта. Но это не важно, просто у меня шрифт правильный. Этот баг я исправлю. Что касается ошибок, то наконец у меня появился еще один комп, на котором можно проводить эксперименты. Я поставил на него 2007 и попробую протестировать макрос на нем.
Ссылка на сообщение
Поделиться на других сайтах

Приветсвую всю чесную братву нашего форума!

Шибко понравился последняя редакция RecordDim от Leona и не удержался немного от себя дорисовал. Все функции остались слегка обновил скин на макрос и добавил кое чего.

Вот так он сейчас выглядит:

post-2673-1191998552_thumb.jpg

Решил перейти с текста на картинки это позволило уменьшить размер окна макроса.

Добавил возможность скрыть макрос (уменьшение до одной кнопки)

Добавил кнопку убрать изменения (работает до того как применили изменения к размеру)

Исправил работу макроса при вставке звездочки.

Ну вот и все пожалуй.

RecordDimM.rar

Ссылка на сообщение
Поделиться на других сайтах

Извини исправлял на 2007, возможности проверить на более позних версиях нет

На 2006 SP5.0 тоже не работает.
Ссылка на сообщение
Поделиться на других сайтах

Давайте сделаем так, у кого какие вопросы возникли задавайте в личку, что бы тему не засорять сообщениями что не работает. Во первых не понятно где не работает. Если не запускатся тогда второй вопрос, а версия предыдущая запускалась? Дело в том что я изменил только скин не добавлял никаких новых модулей, поэтому не ясно в чем проблема.

Leon черкани как у тебя прошло.

Ссылка на сообщение
Поделиться на других сайтах

Rich У меня прошло нормально )) Переназначил библиотеки в референсах и все запустилось. Подробно не тестировал, но внешний вид впечетляет. Теперь даже не знаю, продолжать свой развивать или взять за основу этот. Чтобы все могли оценить выкладываю версию, которая должна запускаться под 2005 и выше.

Исправил работу макроса при вставке звездочки.

А что там было не так? Вроде жаловались на значок диаметра. Не успел еще это исправить.

RecordDimM_2005.rar

Ссылка на сообщение
Поделиться на других сайтах

Да так мелочь если стоял "простой размер" то звездочка была в закрашенной зоне при отображениии размера в макросе. А так как с моими настройками винды эти закрашенные зоны вообще были темносиними :blink: то размера я почти не видел.

А макрос можешь брать за основу симпатишнее будет

Ссылка на сообщение
Поделиться на других сайтах

Добавил возможность скрыть макрос (уменьшение до одной кнопки)

А я бы предложил скрывать не в одну кнопку, а в Taskbar!

Для этого нужно объявить функции:

Private Declare Function GetActiveWindow Lib "user32.dll" () As Long

Private Declare Function GetWindowLong Lib "user32" _

Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) _

As Long

Private Declare Function SetWindowLong Lib "user32" _

Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, _

ByVal dwNewLong As Long) As Long

Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
В активацию формы добавить вначале:
Public Sub UserForm_Activate()

Const GWL_EXSTYLE = (-20)

Const GWL_STYLE = (-16)



Const WS_EX_APPWINDOW = &H40000

'Const WS_MAXIMIZEBOX = 65536

Const WS_MINIMIZEBOX = 131072

Const WS_SYSMENU = 524288

'Const WS_EX_TOOLWINDOW = 128

Const WS_CAPTION = 12582912



Const SW_HIDE = 0

Const SW_SHOW = 5



	hwnd = GetActiveWindow

	lStyle = GetWindowLong(hwnd, GWL_STYLE)

	lStyle = lStyle Or WS_CAPTION

	lStyle = lStyle Or WS_SYSMENU

	lStyle = lStyle Or WS_MINIMIZEBOX

	'lStyle = lStyle Or WS_MAXIMIZEBOX

	SetWindowLong hwnd, GWL_STYLE, lStyle

	lStyle = GetWindowLong(hwnd, GWL_EXSTYLE)

	lStyle = lStyle Or WS_EX_APPWINDOW

	'lStyle = lStyle Or WS_EX_TOOLWINDOW

	SetWindowLong hwnd, GWL_EXSTYLE, lStyle

		ShowWindow hwnd, SW_HIDE

		ShowWindow hwnd, SW_SHOW



...
Для сокрытия формы в TaskBar по нажатию кнопки СКРЫТЬ:
Private Sub HideButton_Click()

Const SW_SHOWMINIMIZED = 2

Const SW_SHOWMAXIMIZED = 3

hwnd = GetActiveWindow

ShowWindow hwnd, SW_SHOWMINIMIZED

End Sub

Да и окошко информации модально привязал к форме программы, чтобы можно было продолжать работать с SW, добавить функцию:

Private Declare Function MessageBox Lib "user32.dll" Alias "MessageBoxA" (ByVal hwnd As Long, _

ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
и в вызов сообщения "О программе", заменить код на следующий:
Private Sub CmdAbout_Click()

hwnd = GetActiveWindow

MessageBox hwnd, "Made by Leon, 2007" & Chr$(10) & "Идея и исходный код - Rich", "RecordsDim", vbOKOnly Or vbExclamation

End Sub

Может это покажется не конструктивно, но вот такие предложения!

Ссылка на сообщение
Поделиться на других сайтах

А я бы предложил скрывать не в одну кнопку, а в Taskbar!

Kelny, чем писать код, лучше бы выложил эту версию. :wink:
Ссылка на сообщение
Поделиться на других сайтах

Господа, не подскажете, как присвоить заданному макросу кнопку на панели инструментов?

Открыть справочную систему по API Solidworks и написать ключевое слово:

макрос

или

macros

Ссылка на сообщение
Поделиться на других сайтах

Присоединяйтесь к обсуждению

Вы можете опубликовать сообщение сейчас, а зарегистрироваться позже. Если у вас есть аккаунт, войдите в него для написания от своего имени.
Примечание: вашему сообщению потребуется утверждение модератора, прежде чем оно станет доступным.

Гость
Ответить в тему...

×   Вставлено в виде отформатированного текста.   Вставить в виде обычного текста

  Разрешено не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отобразить как ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставить изображения напрямую. Загрузите или вставьте изображения по ссылке.

  • Сейчас на странице   0 пользователей

    Нет пользователей, просматривающих эту страницу.




  • Сообщения

    • IgnatvKudrin
      Для нашего производства требуются постоянно инструментальные пружины для штампов. Сейчас заказы обрабатываются довольно долго - до 2-х месяцев. А у нас сроки на штампы 1-2 месяца с испытанием, доработкой и т.п. Хотелось бы найти поставщика, у которого уже есть склад с данными пружинами или кто может доставить за 1 месяц.   Пружины стандартные по ISO, но на всякий случай приложил каталог. Вот список пружин, которые нужны очень срочно:   LR 32 x 44 - 1 шт. LR 25 x 51 - 2 шт. LB 63 x 89 - 7 шт. LB 32 x 102 - 10 шт. LB 32 x 89 - 20 шт. LB 32 x 76 - 12 шт. LB 32 x 51 - 6 шт. LB 25 x 127 - 9 шт.   Готов выслушать все предложения. Возможно даже есть те, кто сможет изготовить подобные пружины с такими же параметрами. 20231101.pdf
    • bubblyk
      Знатоки форума, подскажите, как смоделировать простую (на первый взгляд) задачу термомеханики в упругой постановке.   Есть брусок правильный формы ака кирпич, в котором генерируется НЕРАВНОМЕРНОЕ удельное тепловыделение (HGEN). Задняя и передняя поверхности конвективно охлаждаются с известными (но различными) коэффициентами теплоотдачи и температурами жидкости/газа. Свойства кирпича (теплофизика + механика) принимаются зависящими от температуры. Постановка - стационарная Собственно вопрос : как грамотно смоделировать температурное поле в кирпиче с учетом температурного расширения?   Исходный код приложил.     Надеюсь на коллективный разум и опыт! EPTH2D.mac p.s.   Если есть опыт решения этой задачи в Ansys WB, тоже можно сюда приложить командные вставки.
    • OutXL
      Это было давно использовал NC-Link  и данную инструкцию. The Maho.docx
    • Mikhail_Podgornyj
      Добрый день, кто может поделиться SKF Bearing V1.6 (ANSYS App)? Заранее благодарен!
    • alexqwq10
      В данных корпусах ничего лишнего быть не должно. Максимум шпильки заземления, в количестве предусмотренном для конкретного корпуса. Рассматривал очень много подобных корпусов разных производителей и данная проблема актуальна для подавляющего большинства.
    • MFS
      Коллеги, приветствую, нужно штамповать на горячую из алюминиевого сплава (АК6 или около того) заготовки размером 280*180*12. Подскажите, пожалуйста, параметры пресса для такой заготовки - размеры, усилия. А есл дадите пример такой марки и модели, более менее подходящей для этой работы (нашего или импортного), то будет и еще лучше. Заранее спасибо!
    • Elbaro
      Добрый день. Уже несколько дней пытаюсь найти на просторах инета макрос, позволяющий менять материал выделенных деталей в сборке. У меня есть макрос это делающий, но только в открытой детали, заставить его работать в сборке не получается. Может кто поделится ссылкой или часть кода? Спасибо.
    • maxx2000
      @ANT0N1DZE чтобы ответить на этот вопрос надо вспомнить что экранирует СВЧ, а что для него прозрачно.
    • Александр1979
      В параметре 4018 задаётся метод позиционирования. Какой тип выбран у вас?
    • Bot
      АСКОН, российский разработчик инженерного программного обеспечения и ИТ-интегратор, подвел итоги 2023 года. Выручка компании выросла на 47% и достигла 5,6 млрд рублей, штат сотрудников увеличился до 1250 человек. Клиентская база пополнилась тысячью предприятий и сегодня с решениями АСКОН работают почти 16 000 заказчиков из всех отраслей промышленности и строительства. Смотреть полностью
×
×
  • Создать...