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

Поиск  Пользователи  Правила 
Форум » Пользователи » Александр_67
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 3 След.
Вопрос к знатокам iLogic, Размеры детали.
#
11.05.2020 11:22:08
[QUOTE]Mechanikas пишет:
Дополнительный вопрос:Как я понимаю, это правило будет работать для всех компонентов в сборке.Возможно ли средствами iLogic применять его выборочно, например, только для крепежа, только для профилей и т. п. ?[/QUOTE]

я бы привязал это правило к глобальной форме и пользовал когда возникает необходимость.
 
Перейти
Вопрос к знатокам iLogic, Размеры детали.
#
07.05.2020 12:37:06
[QUOTE]Mechanikas пишет:

Здравствуйте Все,

Как сделать, чтобы, если свойство существует, оно не перезаписывалось бы в результате работы этого правила ?

[CODE] For Each oOccurrence In ThisDoc.Document.ComponentDefinition.Occurrences
iProperties.Value(oOccurrence.Name, "Custom", "CustomProp1") = "xx"
iProperties.Value(oOccurrence.Name, "Custom", "CustomProp2") = "yy"
Next [/CODE]

Спасибо ![/QUOTE]

[CODE] For Each oOccurrence In ThisDoc.Document.ComponentDefinition.Occurrences

If  iProperties.Value(oOccurrence.Name, "Custom", "CustomProp1") <> "xx" Then
iProperties.Value(oOccurrence.Name, "Custom", "CustomProp1") = "xx"
End If


If  iProperties.Value(oOccurrence.Name, "Custom", "CustomProp2") <> "yy" Then
iProperties.Value(oOccurrence.Name, "Custom", "CustomProp2") = "yy"
End If

Next [/CODE]
 
Перейти
Вопрос к знатокам iLogic, Размеры детали.
#
06.05.2018 15:30:02
[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, Размеры детали.
#
30.06.2014 17:54:54
уже не актуально, проблему победил.
Изменено: Александр_67 - 15.07.2014 22:58:21
 
Перейти
Вопрос к знатокам iLogic, Размеры детали.
#
30.06.2014 17:45:23
[QUOTE]niksasa пишет:
Не совсем понял вопрос. Речь идет о деталировке или ...?[/QUOTE]

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

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

<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, Размеры детали.
#
25.12.2013 19:46:15
[QUOTE]niksasa пишет:
Может есть смысл инициаторы событий задействовать для правил или триггер?[/QUOTE]
правила подправил, теперь(вроде) фунциклирует без косяков.
вызов правил оставил как есть.
 
Перейти
Вопрос к знатокам iLogic, Размеры детали.
#
25.12.2013 15:26:49
[QUOTE]niksasa пишет:
Конкретный пример[/QUOTE]

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

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

если быстро наливать то далёко не уедем :-D
 
Перейти
Вопрос к знатокам iLogic, Размеры детали.
#
24.12.2013 17:03:09
как можно программно сделать так чтобы текущее правило отработало
прежде чем запустится следующее?
каждое следующее правило запускается таким макаром:
iLogicVb.RunRule("имя следующего правила")
в конце кода прописано естествено :o
 
Перейти
Несколько вхождений одной параметрической сборки - как?
#
17.07.2018 22:26:42
как это работает,
1. прокачиваем параметры.
2. копируем параметрическую сборку в новое место руками, "сохранить как".
(в моей сборке маленько автомотизированно под требования конторы).
3. тащим заточеные компоненты с чертежами

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

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

'[ замена модели по имени чертежа, во всех чертежах правило:
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
']
 
Перейти
Несколько вхождений одной параметрической сборки - как?
#
17.07.2018 22:06:23
второе правило:

'тащим папку с компонентами и чертежами
' 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
 
Перейти
Несколько вхождений одной параметрической сборки - как?
#
17.07.2018 22:03:17
попытаюсь помочь,

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

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
 
Перейти
Адаптивность детали
#
15.01.2014 02:31:20
[QUOTE]max_k пишет:
Нужно сделать пружину, которая при изменении позиционного представления, меняет свою длину.[/QUOTE]

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

[VIDEO WIDTH=400 HEIGHT=300]http://www.youtube.com/watch?v=qpIX3UL35EE[/VIDEO]
 
Перейти
Класс прочности болтов
#
30.12.2013 01:01:05
[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".
и будет вам счастье.
 
Перейти
Невозможно сохранить библиотеку стилей...
#
23.12.2013 16:21:16
[QUOTE]Алексей Романов пишет:
УПС, удалять не буду, мож кому пригодится второй момент на скрине[/QUOTE]

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

век учись однако, спасибо Алексей, работает.
Изменено: Александр_67 - 23.12.2013 16:04:43
 
Перейти
Невозможно сохранить библиотеку стилей...
#
23.12.2013 15:18:37
в библиотеке стилей создал новый материал,
в контент центре пытаюсь поменять материал детали со "стандарта" на новый но его нет в меню,
что делать?
<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 След.

© 2004–2020, Русская Промышленная Компания тел./факс: (495) 744-0004