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

Сделай свою работу в 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 эмодзи.

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

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

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

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

    • Dmitriy618



  • Сообщения

    • Богоманшин Игорь
      Эта пластина не совсем походит для вашего чугуна, производитель пишет "для стали и нержавейки", чугун как опция, рекомендует для К25, а у вас К10 (перлитный). Посмотрите в том же магазине пластины, у которых диапазон применения К05-К30. Но не факт, что пойдут без задиров.  Придется нескольких производителей пробовать.
    • FAV83
      Кто может помочь по расчету полноконусной форсунки для воды, в трубопроводе? Расход  требуется 5,53 м3/ч, разница в давлении 0,434МПа. Требуется разработать чертеж под изготовление, если есть желающие - пишите в личку 
    • Zergus
      Выкладывайте сюда свои "чудеса", может по модели получится понять, что в ней не так. А если есть возможность писать в техподдержку - кидайте им свой файл, думаю разберутся.
    • FAV83
      Интересует аналогичная задача по расчету полноконусной форсунки для воды, но мне требуется разработать чертеж по опросному листу, если есть желающие - пишите в личку 
    • Богоманшин Игорь
      А есть подтверждение в каких либо нормативных документах? Или только из соображений "максимально минимальная себестоимость"?
    • ANT0N1DZE
      Это не поможет ответить на этот вопрос конкретными числами. Судя по всему, там металлические частички внутри материала. Подобные эластомеры существуют и применяются. 
    • gudstartup
      как перевести шпиндель снова первоначальный режим управления скоростью когда ему пофиг число импульсов на оборот? резьбу пока резать не будут а в подпрограмму смены можно что нить добавить или в реализацию m19  чтобы чпу из режима контроля позиционного кодера вышло?
    • gudstartup
    • mactepnew
      Вот я тоже так думал, пока не столкнулся с обратным) Как еще столкнусь, пришлю скриншот. Хаос еще в том, что порядок в дереве построения весьма условный. операция, которая стоит перед групой, имеет бОльший timestamp(пардон, не знаю как это в переводе), чем эта группа, и выполняется позже. При этом все операции в группе имеют timestamp на пару сотен меньше и выполняются раньше, чем две группы, стоящие перед ней. Логика?  Если в эскизе все элементы определены, то можно поставить еще один размер (хочешь переопределить эскиз - да пожалста!), изменить его - и NX самостоятельно выберет, какой размер или ограничение отпустить и весь эскиз летит к чертям. Это ли не хаос?   Назовете хоть один CAD, которым можно пользоваться так? Любой из встреченных мной имеет много неочевидных нюансов, которые конечно не проявляются при выполнении университетского или базового курса. В Creo я на протяжении 5 лет находил всё новые фишки, которые не прописаны в документации. Огромная благодарность Ruslan за пояснения тонкостей. Даже Компас и Solidworks, которые считаются самыми дружественными, оказалось непросто обуздать, когда проходил собеседования и делал тестовые. А ведь университетский курс знал на отлично!   Возвращаясь к NX - вот сегодняшний пример. Утром деталь была оранжевая, единая. Изменил пару уклонов и толщин, стала желтая с элементами оранжевого и частично твердотельной, частично листовой. Я даже не знаю, как сформулировать вопрос в поддержку. 
    • Mikhail_Podgornyj
      Добрый день, кто может поделиться SKF Bearing V1.6 (ANSYS App)? Заранее благодарен!
×
×
  • Создать...