Александр_67 (Все сообщения пользователя)

Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 След.
Несколько вхождений одной параметрической сборки - как?
как это работает,
1. прокачиваем параметры.
2. копируем параметрическую сборку в новое место руками, "сохранить как".
(в моей сборке маленько автомотизированно под требования конторы).
3. тащим заточеные компоненты с чертежами

шаг 1. можно повторять.

Огромное Спасибо и большой привет Алексею Романову.
Он меня олуха на путь истинный наставлял. :{}
Изменено: Александр_67 - 17.07.2018 22:30:21
Несколько вхождений одной параметрической сборки - как?
далее

'[ замена модели по имени чертежа, во всех чертежах правило:
fileName = ThisDoc.PathAndFileName(False) + ".ipt" ' в сборке меняем на ".iam"
oView = ThisDoc.Document.Sheets.Item(1).DrawingViews.Item(1)
If fileName <> oView.ReferencedDocumentDescriptor.ReferencedFileDescriptor.FullFileName Then
  oView.ReferencedDocumentDescriptor.ReferencedFileDescriptor.ReplaceReference(fileName)

End If
']
Несколько вхождений одной параметрической сборки - как?
второе правило:

'тащим папку с компонентами и чертежами
' ipt;iam;idw_copy

newPach = ThisDoc.Path + "\" + "папка с компонентами"

If IO.Directory.Exists(newPach) = False Then
System.IO.Directory.CreateDirectory(newPach)'создаём папку для компонентов
Else MessageBox.Show("эта папка уже существует", "Проверка")
End If

Dim sourceDir As String = "путь к материнской сборке" + "\" + "папка с компонентами"
Dim backupDir As String = ThisDoc.Path + "\" + "папка с компонентами"
Dim Pr As String = "имя параметра с номером заказа или проекта или ещё какой критерий"

Dim Directory As System.IO.Directory
   Dim iptList As String() = Directory.GetFiles(sourceDir, "*.ipt")
   Dim idwList As String() = Directory.GetFiles(sourceDir, "*.idw") ' чертежи тоже тащим с собой
Dim iamList As String() = Directory.GetFiles(sourceDir, "*.iam")

Try

   For Each f As String In iamList 'копируем сборки

Dim fName As String = f.Substring(sourceDir.Length + 1)


NewFileName = backupDir & "\" & Pr & " " & fName ' ok
OldFileName = sourceDir & "\" & fName ' ok

OldName = Left(fName, Len(fName) - 4) & ":1" ' ok

If IO.File.Exists(NewFileName) = False Then
System.IO.File.Copy(OldFileName, NewFileName, True)
End If
Try
Component.Replace(OldName, NewFileName, True)
Catch
End Try

Next


   For Each f As String In iptList'копируем детали

Dim fName As String = f.Substring(sourceDir.Length + 1)


NewFileName = backupDir & "\" & Pr & " " & fName ' ok
OldFileName = sourceDir & "\" & fName ' ok

OldName = Left(fName, Len(fName) - 4) & ":1" ' ok

If IO.File.Exists(NewFileName) = False Then
System.IO.File.Copy(OldFileName, NewFileName, True)
End If
Try
Component.Replace(OldName, NewFileName, True)
Catch
End Try

Next


   For Each f As String In idwList
Dim fName As String = f.Substring(sourceDir.Length + 1)


NewFileName = backupDir & "\" & Pr & " " & fName ' ok
OldFileName = sourceDir & "\" & fName ' ok

If IO.File.Exists(NewFileName) = False Then
System.IO.File.Copy(OldFileName, NewFileName, True)
End If


Next

Catch
End Try
Несколько вхождений одной параметрической сборки - как?
попытаюсь помочь,

'правило для замены парамеров в деталях и подсборках. можно привязать к форме или создать в материнской сборке
'и привязать к форме.
'все параметры спускаются из головной сборки.

Dim sourceDir As String = ThisDoc.Path + "\" + "папка с компонентами" 'обязательно в папке с материнской сборкой
'должна быть папка с компонентами материнской сборки, которые будут тащиться с дочерней сборкой с заменой параметров.
'не параметризировынные детали или подсборки не должны находиться в папке с компонентами.

Dim Directory As System.IO.Directory
   Dim iamList As String() = Directory.GetFiles(sourceDir, "*.iam")' список подсборок
Dim iptList As String() = Directory.GetFiles(sourceDir, "*.ipt")' список деталей
Try

   For Each f As String In iamList
       Dim fName As String = f.Substring(sourceDir.Length + 1)

   Name = Left(fName, Len(fName) - 4) & ":1"

'каждый параметр заключаем в конструкцию чтобы при отсутствии параметра код работал дальше
Try
Parameter(Name ,"имя параметра") = Parameter("имя параметра")
Catch
End Try


Next

   For Each f As String In iptList
       Dim fName As String = f.Substring(sourceDir.Length + 1)

   Name = Left(fName, Len(fName) - 4) & ":1"

Try
Parameter(Name ,"имя параметра") = Parameter("имя параметра")
Catch
End Try


Next

Catch
End Try

iLogicVb.UpdateWhenDone = True
Вопрос к знатокам iLogic, Размеры детали.
[QUOTE]Александр2018 пишет:

Не подскажете ли вы знатоки Айлогика!
Как из модели в чертеж перекинуть какое ни будь пользовательское свойство, при том чтобы оно менялась в области чертежа в зависимости от изменения в модели. (обратный порядок я понял - а вот туплю над такой задачей - пятница)
Помогите плиз[/QUOTE]

modelName = IO.Path.GetFileName(ActiveSheet.View("VIEW1").ModelDocument.FullFileName)' достаём имя модели из вида чертежа

dwgParam = Parameter(modelName, "d0")' читаем значение парамета d0 в модели

blabla = iProperties.Value(modelName, "property tab name", "property name")' читаем свойства модели

iProperties.Value("property tab name", "property name") = blabla' сохраняем в свойствах чертежа
Вопрос к знатокам iLogic, Размеры детали.
уже не актуально, проблему победил.
Изменено: Александр_67 - 15.07.2014 22:58:21
Вопрос к знатокам iLogic, Размеры детали.
[QUOTE]niksasa пишет:
Не совсем понял вопрос. Речь идет о деталировке или ...?[/QUOTE]

нет, надо под лазерную резку и гибку сделать чертежи.
на скрине снизу для резки.

смысл этого чертежа в том, что детали одинаковой толщины, и с одинаковыми внешними размерами(развёртки) будут в одном чертеже.
Изменено: Александр_67 - 30.06.2014 17:51:50
Вопрос к знатокам iLogic, Размеры детали.
Всем привет. Назрел вопрос, как можно выдернуть из свойств сборки названия деталей в чертёж,
названия деталей надо естественно прикрутить к видам.
скрины прилагаю

<a href="http://www.picshare.ru/view/4748250/" target="_blank"><img src="http://www.picshare.ru/uploads/140630/T6reXQm3a2_thumb.jpg" border="0" title="Хостинг картинок PicShare.ru"></a>

<a href="http://www.picshare.ru/view/4748312/" target="_blank"><img src="http://www.picshare.ru/uploads/140630/9P722d1HG0_thumb.jpg" border="0" title="Хостинг картинок PicShare.ru"></a>

забыл, сборка параметрическая, с заменой всех деталей из СС с помощью правила ilogic. правило надо както из среды сборки выполнять.
Изменено: Александр_67 - 30.06.2014 17:43:33
Вопрос к знатокам iLogic, Размеры детали.
[QUOTE]niksasa пишет:
Может есть смысл инициаторы событий задействовать для правил или триггер?[/QUOTE]
правила подправил, теперь(вроде) фунциклирует без косяков.
вызов правил оставил как есть.
Вопрос к знатокам iLogic, Размеры детали.
[QUOTE]niksasa пишет:
Конкретный пример[/QUOTE]

в сборке 14 правил, с помощью правил меняются детали сборки, но в некоторых случаях деталь непосредственно перед заменой подавлена(эту проблему решил), ну и так далее. в процессе ковыряния ещё.
ну и возникло впечатление что правила запускаются "как хотят", хотя первое правило запускаеся событием а последующие из правил.(какафония какаято, сам не понял что накарябал :D )
Вопрос к знатокам iLogic, Размеры детали.
[QUOTE]Алексей Романов пишет:
Реально VBA чуть медленнее в обучении (но мое ощущение - противоположное), но ни чем не ограничено в применении (в отличие от iLogic)...)))[/QUOTE]

всё упирается как раз в мою "тёмность", максимум что я в VB делал, это заточка постпроцессора под стойку Heidenhain.
Вопрос к знатокам iLogic, Размеры детали.
[QUOTE]Алексей Романов пишет:
Начинается![/QUOTE]

если быстро наливать то далёко не уедем :-D
Вопрос к знатокам iLogic, Размеры детали.
как можно программно сделать так чтобы текущее правило отработало
прежде чем запустится следующее?
каждое следующее правило запускается таким макаром:
iLogicVb.RunRule("имя следующего правила")
в конце кода прописано естествено :o
Вопрос к знатокам iLogic, Размеры детали.
[QUOTE]Rubberneck пишет:
как быть[/QUOTE]

смотрите со 189 поста в этой теме.
так получилось у меня
<a href="http://www.picshare.ru/view/3531842/" target="_blank"><img src="http://www.picshare.ru/uploads/131223/7kU4uEvpy7_thumb.jpg" border="0" title="Хостинг картинок PicShare.ru"></a>
сборки из одного семейства.
Изменено: Александр_67 - 23.12.2013 16:42:01
Вопрос к знатокам iLogic, Размеры детали.
[QUOTE]Rubberneck пишет:
Может, правила нужно создавать в подсборках?[/QUOTE]

[QUOTE]Rubberneck пишет:
все параметры всех деталей находятся в одном файле excel[/QUOTE]


<a href="http://www.picshare.ru/view/3531132/" target="_blank"><img src="http://www.picshare.ru/uploads/131223/bYrSIaBQWA_thumb.jpg" border="0" title="Хостинг картинок PicShare.ru"></a>

в каждой параметрической детали обратите внимание на то чтобы деталь обновлялась сразу после изменения параметров.
Адаптивность детали
[QUOTE]max_k пишет:
Нужно сделать пружину, которая при изменении позиционного представления, меняет свою длину.[/QUOTE]

на немецком правда, но принцип понятен.

[VIDEO WIDTH=400 HEIGHT=300]http://www.youtube.com/watch?v=qpIX3UL35EE[/VIDEO]
Класс прочности болтов
[QUOTE]Nikita Konurkin пишет:
Может знаете в чем проблема?[/QUOTE]
в чём проблема не скажу(не рублю в ангельском диалекте), но попробуйте в такой последовательности
<a href="http://www.picshare.ru/view/3567837/" target="_blank"><img src="http://www.picshare.ru/uploads/131230/5x7481nJb1_thumb.jpg" border="0" title="Хостинг картинок PicShare.ru"></a>
после коррекции столбца в ёкселе сохранить и отключить ёксель, уже в библиотеке клацнуть по "применить" и "ok".
и будет вам счастье.
Невозможно сохранить библиотеку стилей...
[QUOTE]Алексей Романов пишет:
УПС, удалять не буду, мож кому пригодится второй момент на скрине[/QUOTE]

Спасибо, пригодилось, я ужо дурную работу начал делать по незнанию)))
Невозможно сохранить библиотеку стилей...
[QUOTE]Алексей Романов пишет:
Новый материал создается в контексте детали[/QUOTE]

век учись однако, спасибо Алексей, работает.
Изменено: Александр_67 - 23.12.2013 16:04:43
Невозможно сохранить библиотеку стилей...
в библиотеке стилей создал новый материал,
в контент центре пытаюсь поменять материал детали со "стандарта" на новый но его нет в меню,
что делать?
<a href="http://www.picshare.ru/view/3531546/" target="_blank"><img src="http://www.picshare.ru/uploads/131223/3kXF2n4hNY_thumb.jpg" border="0" title="Хостинг картинок PicShare.ru"></a>
Страницы: 1 2 3 След.