개발 요청] 이미지 생성 프로그램 #2

□ 단계별 단순화 표현을 만들고, 항목 추가 방법

새로운 단순 표현(Simplified Representation)을 만들려면, IpfcSimpRepInstructions 객체를 만들어야 합니다.

1. IpfcCreateNewSimpRepInstructions :
   새로운 단순화 표현을 생성하는 데 사용되는 클래스입니다.

2. 다음 메서드 중 하나를 호출하여 항목에 적용할 작업을 지정합니다. : 아이템에 적용할 동작(Action) 지정

• IpfcSimpRepItem에 적용할 동작(Action)을 설정합니다.
• exclude, include, substitute 등의 방법을 호출하여 이 동작을 설정할 수 있습니다.
  예를 들어, 특정 구성 요소를 단순화 표현에 포함하려면 include 메서드를 사용할 수 있습니다.

3. IpfcSimpRepItem.Create() 메서드를 호출하여 항목에 대한 IpfcSimpRepItem 객체를 초기화합니다.
4. IpfcSimpRepItem 시퀀스에 항목을 추가합니다. 
     IpfcSimpRepInstructions.Items를 사용하여 새로운 IpfcSimpRepInstructions를 넣습니다.
5. IpfcSimpRep.SetInstructions()를 호출하여 IpfcSimpRepInstructions 객체를 해당 IpfcSimpRep 객체에 다시 할당합니다.

 

▷참고 문서

CS313035 - How to create a simplified representation by Creo Parametric VB API?

---

□ 새로운 단순화 표현 만들기

새로운 단순화 표현(Simplified Representation)을 만들려면, IpfcCreateNewSimpRepInstructions 객체를 만들어야 합니다. 이 객체는 CCpfcCreateNewSimpRepInstructions.Create() 메소드로 생성할 수 있습니다. 이 메소드를 호출할 때, 새로 만들 단순화 표현의 이름을 입력으로 지정해야 합니다. 이후에는 "기본 작업 유형(default action type)"을 설정하고,
단순화 표현에 필요한 SimpRepItems를 추가해야 합니다.

• 새로운 단순화 표현을 생성하려면, IpfcSolid.CreateSimpRep() 메소드를 호출하면 됩니다.
• 이 메소드는 새로 생성된 단순화 표현을 나타내는 IpfcSimpRep 객체를 반환합니다.

▷ 새로운 단순화 표현 이름 만들기 Code

Sub SIM01()
    On Error GoTo RunError
    Application.EnableEvents = False

    '// Module Name : CreoVBAStart
    Call CreoVBAStart.CreoConnt01
    
    Dim Solid As IpfcSolid
    Dim Simrep As IpfcSimpRep
    
    '// 단순화 표현 이름 설정을 위한 객체 선언
    Dim CreateSimpRepInstructions As New CCpfcCreateNewSimpRepInstructions
    Dim NewSimpRepInstructions As IpfcCreateNewSimpRepInstructions
    Dim simpRepName As String
    
    Set Solid = model
    simpRepName = "MySimplifiedRep" '//단순화 표현 이름

    Set NewSimpRepInstructions = CreateSimpRepInstructions.Create(simpRepName)
    Set Simrep = Solid.CreateSimpRep(NewSimpRepInstructions)      
    
    '// 입력된 이름으로 단순화 표현 활성화
    '// Call Solid.ActivateSimpRep(simrep)
    
 conn.Disconnect (2)
    
    
    '// Cleanup
    Set asynconn = Nothing
    Set conn = Nothing
    Set BaseSession = Nothing
    Set model = Nothing
    
RunError:
            If Err.Number <> 0 Then
                MsgBox "Process Failed: An error occurred." & vbCrLf & _
                       "Error No: " & CStr(Err.Number) & vbCrLf & _
                       "Error Description: " & Err.Description & vbCrLf & _
                       "Error Source: " & Err.Source, vbCritical, "Error"
                If Not conn Is Nothing Then
                    If conn.IsRunning Then
                        conn.Disconnect (2)
                    End If
                End If
            End If
End Sub

 

▷ Code 실행 결과

새로운 단순화 표현이 생성이 됩니다.

 

---

□  새로운 만든 단순화 표현의 유형 정의

"IpfcCreateNewSimpRepInstructions"는 "IpfcSimpRepInstructions"로 부터 상속을 받습니다. 

Property DefaultAction as IpfcSimpRepActionType

 

▷ 새로운 단순화 표현 유형 정의 Code

'// 단순화 표현 지침 생성
Dim NewSimpRepInstructions As IpfcCreateNewSimpRepInstructions
Dim SimpRepInstructions As IpfcSimpRepInstructions

Set SimpRepInstructions = NewSimpRepInstructions
SimpRepInstructions.DefaultAction = EpfcSIMPREP_INCLUDE

---

□ Iintseq

Iintseq 클래스는 숫자들의 나열을 나타냅니다. 이 나열된 숫자들은 순서대로 정렬되어 있으며, 각 숫자는 고유한 위치
(인덱스)를 가지고 있습니다. 예를 들어

[1, 2, 3, 4, 5]

이것은 5개의 숫자로 구성된 Iintseq 클래스의 한 예입니다. 여기서 첫 번째 숫자는 1이고, 두 번째 숫자는 2이며, 이렇게 순서대로 나열되어 있습니다.

▷ Iintseq 클래스의 주요 기능:

• 숫자의 나열: 여러 개의 숫자를 순서대로 저장하고 관리합니다.
• 인덱스를 통한 접근:
  각 숫자는 고유한 인덱스를 가지며, 이 인덱스를 사용하여 해당 숫자에 접근할 수 있습니다.
  예를 들어, 위의 예시에서 첫 번째 숫자에 접근하려면 인덱스 0을 사용합니다.
• 순서 유지: 숫자들은 입력된 순서대로 저장되며, 이 순서는 유지됩니다.

▷Iintseq 클래스는 다양한 프로그래밍 작업에서 활용됩니다.

• 데이터 처리: 숫자 데이터를 처리하고 분석하는 데 사용됩니다.
• 배열 구현: 배열과 비슷한 방식으로 숫자들을 저장하고 관리합니다.
• 순서적인 작업: 순서대로 처리해야 하는 작업에 사용됩니다.

Sub Append ( Item as Long )

---

□ IpfcSimpRepCompItemPath (구성 요소 경로)

• 이 클래스는 어셈블리 내 특정 부품을 식별합니다.
• 예를 들어, 어셈블리(조립된 모델)에서 특정 부품만 선택하여 포함시키거나 제외하고자 할 때 사용합니다.
• 부품의 위치를 찾아서 어떤 작업을 할지 지정하는 데 쓰입니다.

Function CCpfcSimpRepCompItemPath.Create (ItemPath as Iintseq) as IpfcSimpRepCompItemPath

 

▷ Code

 

Dim CreateSimpRepCompItemPath as New CCpfcSimpRepCompItemPath
Dim SimpRepCompItemPath as IpfcSimpRepCompItemPath
Dim ModelIintseq As Iintseq

set SimpRepCompItemPath = CreateSimpRepCompItemPath.Crete (ModelIintseq)

---

□ IpfcSimpRepItem

단순화된 표현에서 구성 요소 또는 기능의 상태를 정의합니다. Creo의 Simplified Representation(단순화 표현)에서 특정 구성 요소나 피처의 상태를 정의하는 데 사용됩니다. 이 인터페이스는 사용자가 특정 모델의 단순화 표현에서 구성 요소 또는 피처를 포함하거나 제외하는 등 다양한 동작을 설정할 수 있도록 해줍니다.

아래 함수는 새로운 객체를 생성하여 단순화 표현(Simplified Representation)에서 "구성요소(component)" 또는 "피처(feature)"의 상태를 정의합니다.

Function CCpfcSimpRepItem.Create (ItemPath as IpfcSimpRepItemPath) as IpfcSimpRepItem

 

▷ Code

Dim CreateSimpRepItem As New CCpfcSimpRepItem
Dim SimpRepItem As IpfcSimpRepItem
Dim SimpRepCompItemPath as IpfcSimpRepCompItemPath

Set SimpRepItem = CreateSimpRepItem.Create(SimpRepCompItemPath)

---

□ IpfcSimpRepItems

단순화 표현(Simplified Representation)에서 각 구성 요소(부품이나 피처)에 적용할 작업을 정의하는 항목들의 배열입니다. 이 클래스는 단순화 표현을 만들기 위한 작업 목록을 담고 있습니다. 이 목록에는 각 부품이나 피처에 대한 작업이 순서대로 나열되어 있습니다. 배열은 순서 입니다. 아래의 예제를 참고 하세요

[
    { 작업: "엔진 숨기기" },
    { 작업: "바퀴 표시" },
    { 작업: "차체 색상 변경 (빨간색)" },
    { 작업: "내부 부품 투명하게 만들기" }
]

 

Sub Append ( Item as IpfcSimpRepItem )

새로운 아이템을 배열의 끝에 추가 합니다

▷ Code

Dim SimpRepItems AS IpfcSimpRepItems
Dim SimpRepItem as IpfcSimpRepItem

call SimpRepItems.Append (SimpRepItem)

---

 

□ IpfcSimpRep

Sub SetInstructions (Instructions as IpfcSimpRepInstructions [optional])

단순화 표현은 복잡한 어셈블리를 간단하게 표현한 것입니다. 이 함수는 이러한 단순화 표현을 어떻게 만들지에 대한 지시를 설정하는 역할을 합니다. SetInstructions 함수는 단순화 표현을 생성하고 수정하는 데 필수적인 기능입니다. 이 함수를 사용하여 원하는 단순화 표현을 만들 수 있습니다.

Instructions: 
이 단순화 표현을 만들 때 어떤 부분을 포함시킬지, 어떤 부분을 제외할지, 어떻게 표현할지 등에 대한 상세한 지시 사항을 담고 있습니다. 단순화 표현을 만들기 위한 레시피와 같다고 볼 수 있습니다.

레시피 : 포함/제외: 어떤 부품을 단순화 표현에 포함시키고, 어떤 부품을 제외할지 지정합니다.

▷ Code

Dim Simrep As IpfcSimpRep
Dim SimpRepInstructions As IpfcSimpRepInstructions

Call Simrep.SetInstructions(SimpRepInstructions)