본문 바로가기
  • Welcome!

VBA, VB.NET For Creo321

Model Operations □ 사용 가능 한 함수 () IpfcModel.Backup() 메모리의 개체를 지정된 디렉터리의 디스크에 백업합니다. IpfcModel.Copy() 지정된 모델을 다른 파일에 복사합니다. IpfcModel.CopyAndRetrieve() 모델을 다른 이름으로 복사하고 해당 새 모델을 세션으로 검색합니다. IpfcModel.Rename() 지정된 모델의 이름을 바꿉니다. IpfcModel.Save() 지정된 모델을 디스크에 저장합니다. IpfcModel.Erase() 세션에서 지정된 모델을 지웁니다. 다른 모델에서 사용되는 모델은 해당 모델에 종속된 모델이 삭제될 때까지 삭제될 수 없습니다. IpfcModel.EraseWithDependencies() 세션의 다른 항목에 종속성이 필요하지 않은 경우 세션에.. 2023. 10. 6.
Creo Template 프로그램 #2 □ Parameter와 Dimension 변경 하기 Gear 모델을 변경 하기 위해, 엑셀의 Cell 값으로 모델을 업데이트 하는 코드 입니다. Parameter의 경우 실수와 정수를 구분 해야 합니다. Dimension은 실수 이며, 음수와 "0"을 입력 하면 안됩니다. Creo VBA의 코드와 모델의 Parameter 타입(정수, 실수, 스트링)이 다르면 프로그램은 오류가 납니다. 반드시 타입을 동일하게 맞추십시요 ▷전체 코드 Option Explicit Sub SPUR_IM() On Error GoTo RunError Dim asynconn As New pfcls.CCpfcAsyncConnection Dim conn As pfcls.IpfcAsyncConnection Dim Session As pf.. 2023. 9. 12.
#1 IpfcAssembly □ IpfcAssembly 소개 어셈블리 모델에 대한 다양한 기능을 제공합니다. 이 인터페이스를 사용하여 어셈블리 모델을 조작하거나 정보를 얻을 수 있습니다. ▷ IpfcAssembly.IsExploded 어셈블리 모델이 "Exploded"된 상태인지 아닌지를 확인할 수 있습니다. [Property] IsExploded as Boolean 예제 코드) Dim Assembly As IpfcAssembly Set Assembly = model MsgBox Assembly.IsExploded ▷ IpfcAssembly.AssembleComponent 어셈블리 모델 내에서 컴포넌트를 조립하는 기능을 수행합니다. 이 메서드는 어셈블리에 컴포넌트를 추가하거나 조립할 때 사용됩니다. [Function] Assembl.. 2023. 8. 20.
IpfcModelItemOwner □ IpfcModelItemOwner 소개 모델 내에서 아이템(피쳐, 부품, 어셈블리 등)을 소유하고 관리하는 데 사용되는 인터페이스입니다. IpfcModelItemOwner.ListItems [Function] ListItems (Type as IpfcModelItemType [optional]) as IpfcModelItems [optional] 활성화된 모델에서 지정된 유형의 항목 (Surface, Edge . . . )으로. 모델이 가지고 있는 목록들을 제공 합니다. 만일 "nothing" 으로 입력 하면 모든 유형의 항목에서 검색 하여 목록을 제공 합니다 ▷ 모델의 ID를 표시 하는 예제 코드 Dim ModelItemOwner As IpfcModelItemOwner Dim ModelItems A.. 2023. 8. 18.
#1 IpfcModel □ IpfcModel 소개IpfcModel 클래스는 Creo Parametric에서 현재 작업 중인 모델에 대한 정보를 담고 있는 클래스입니다. 이 클래스를 통해 모델의 다양한 속성에 접근하고, 모델을 조작하는 다양한 기능을 수행할 수 있습니다. Revision: 모델의 개정 정보를 나타냅니다. 데이터 관리 시스템과 연계하여 모델의 개정 관리에 사용될 수 있습니다.Version: 모델의 버전 정보를 나타냅니다. 데이터 관리 시스템에서 모델의 버전 관리에 사용될 수 있습니다.Branch: 모델의 브랜치 정보를 나타냅니다. 데이터 관리 시스템에서 여러 가지 모델 브랜치를 관리하거나 비교할 때 사용될 수 있습니다.ReleaseLevel: 모델의 릴리스 레벨 정보를 나타냅니다. 데이터 관리 시스템에서 모델의 릴.. 2023. 8. 18.
#2 quilt의 면적 표시 - 고급 편 □ 소개 50개의 치수 조합을 자동으로 모델에 대입 하여, quilt의 면적을 자동으로 표시 하는 프로그램 입니다. 치수 조합은 Array 기능을 이용하여 개발 하였습니다 ▷ 참고 사이트 quilt의 면적 표시 ■ 소개 모델에 이름("korea")이 정의된 면적을 표시 하는 기능입니다 ▷ Croe 모델 준비 모델에서 서피스 여러개를 복사 하고, 이름을 "korea"로 정의 합니다 ▷ Creo에서 면적 표시 □ Quilt 면적을 표 tool-2020.tistory.com Array 공부 - 치수 값을 조합 하여 화면에 표시하기 □ 소개 1행 10개, 2행 5개를 조합하여, 곱하는 코드 입니다 ▷ 액셀 파일 ▷ 코드 Sub MultiplyArrays() Dim array1(1 To 10) As Double .. 2023. 8. 16.
Array 공부 - 치수 값을 조합 하여 화면에 표시하기 □ 소개 1행 10개, 2행 5개를 조합하여, 곱하는 코드 입니다 ▷ 액셀 파일 ▷ 코드 Sub MultiplyArrays() Dim array1(1 To 10) As Double Dim array2(1 To 5) As Double Dim resultArray(1 To 10, 1 To 5) As Double Dim i As Integer, j As Integer ' 1행 배열 값 할당 For i = 1 To 10 array1(i) = Cells(i, "A").Value Next i ' 2행 배열 값 할당 For i = 1 To 5 array2(i) = Cells(i, "B").Value Next i ' 결과 배열 계산 For i = 1 To 10 For j = 1 To 5 resultArray(i, j).. 2023. 8. 15.
#1 quilt의 면적 표시 ■ 소개 모델에 이름("korea")이 정의된 면적을 표시 하는 기능입니다 ▷ Croe 모델 준비 모델에서 서피스 여러개를 복사 하고, 이름을 "korea"로 정의 합니다 ▷ Creo에서 면적 표시 □ Quilt 면적을 표시 하는 코드 주의) 1. 모델에서 Quilt의 이름은 고유 해야 합니다 2. "IpfcQuilt.ListElements"의 경우, VBA 메뉴얼에는 Funtion은 있지만. 에디터에는 표시되지 않는 경우 있습니다. Dim Modelowner As IpfcModelItemOwner Dim ModelItem As IpfcModelItem Dim Quilt As IpfcQuilt Dim Surface As IpfcSurfaces Set Modelowner = model Set ModelIt.. 2023. 8. 15.
#9 IpfcBaseSession.Select() - Surface ■ IpfcBaseSession.Select() 소개 Creo Parametric에서 객체를 대화식으로 선택할 수 있습니다. 선택된 요소를 다루는 데 사용되는 것은 반환된 객체입니다. 선택된 객체에 따라 다양한 작업을 수행할 수 있습니다. 예를 들어, 선택된 요소의 속성을 확인하거나 변경하거나, 요소를 삭제하거나 수정하는 등의 작업이 가능합니다. [Function] Select (Options as IpfcSelectionOptions, InitialSels as IpfcSelections [optional]) as IpfcSelections [optional] ▷ Options as IpfcSelectionOptions 옵션 키워드 및 허용되는 최대 선택 수를 포함한 선택 옵션. 클래스에는 다양한 속성.. 2023. 8. 14.
#8 IpfcBaseSession - 파일 Create Function ■ Create Function 소개 비어 있는 part, 어셈블 파일을 생성 합니다. Template Drawing을 이용하여 새로운 도면을 새성 합니다. 타 CAD 데이터를 import 합니다. IpfcBaseSession.CreateAssembly IpfcBaseSession.CreateDrawingFromTemplate IpfcBaseSession.CreateModelWindow IpfcBaseSession.CreatePart ▷ IpfcBaseSession.CreateAssembly [Function] CreateAssembly (Name as String) as IpfcAssembly 사용 예) Dim Window As IpfcWindow Dim Assembly As IpfcAssembly '.. 2023. 8. 12.
프로그램 개발을 AI (artificial intelligence)로 하면 좋은 이유 일반적인 프로그램 개발은 AI를 활용 하면, 정확한 코드를 제공 합니다. 아주 빠르게 제공 합니다 그런데 특수한 분야, 즉 Creo VBA와 같은 프로그램 개발은 엉뚱한 코드를 만듭니다. 하지만 새로운 프로그램을 개발 할때, 어떻게 접근 해야 할지 모릅니다. 이때 AI를 활용하면 제공하는 코드를 유심히 보면 어떻게 접근해야 하는지 알수 있습니다. PTC에서 VBA 사용자 메뉴얼을 제공 합니다. 메뉴얼 내용을 100% 전달 하지 못합니다. 예제라도 많은면 좋을 텐데. 그런것도 없습니다. 이럴때 AI를 활용해 보십시요. 맨땅에 헤딩할때 도움을 줄수 있습니다. [AI란 무엇인가] 인공지능 머신러닝 딥러닝 차이점 총정리 혼자 공부하는 책 [AI란 무엇인가] 인공지능 머신러닝 딥러닝 차이점 총정리 두 줄 요약: .. 2023. 8. 8.
IpfcView 코드 및 기능 테스트 ■ IpfcView 소개 Creo Parametric의 그래픽 뷰를 나타내는 인터페이스입니다. 이 인터페이스를 통해 3D 모델의 가시성, 표현 방법, 표시 설정 등을 제어할 수 있습니다. 변환 행렬은 개체의 좌표계에서 논리적 화면 좌표로의 변환을 제공합니다. 이 행렬에는 어셈블리 구성원에 대한 변환이 포함되어 있지 않습니다. ▷ IpfcView .Reset : 기본 방향으로 뷰 변환 Dim Windows As IpfcWindow Dim ViewOwner As IpfcViewOwner Dim View As IpfcView '// View 변수에 뷰 이름 정의 Set Windows = session.CurrentWindow Set ViewOwner = model Set View = ViewOwner.Retr.. 2023. 8. 8.
반응형

티스토리툴바