개요

Inventor에서는 .ipt 부품 파일과 .idw 도면 파일 간의 연관성을 기반으로 설계가 이루어집니다.
하지만 새로운 도면 번호로 동일한 설계를 복제할 경우, 단순히 파일을 복사하면 부품과 도면 간의 참조가 끊어지거나 잘못된 참조가 발생할 수 있습니다.

이번 Techletter의 i-Logic 규칙을 통해 기존 부품과 링크된 도면을 새 이름으로 저장하면서 연관성을 유지하는 방법을 안내드립니다.

주요 기능

사용 전 준비 사항

사용 방법

  1. i-Logic 규칙 추가
    • 부품 파일에서 iLogic>규칙>규칙 작성
    • 아래 코드 추가 후 저장
  2. 규칙 실행
    • 작성한 규칙 실행
    • 새 파일명 입력 후 확인

i-Logic 규칙 코드

‘ 도면 확장자 및 부품 확장자 설정
Dim DWGType As String = “.idw”
Dim PRTType As String = “.ipt”

‘ 현재 파일 이름 (확장자 제외)
CurrentFilename = ThisDoc.PathAndFileName(False)

‘ 연관 도면 파일 확인
If Not System.IO.File.Exists(CurrentFilename & DWGType) Then
MessageBox.Show(“부품 도면을 찾을 수 없습니다.:” & vbLf & vbLf & _
CurrentFilename & DWGType & vbLf & vbLf & _
“도면의 폴더 위치와 이름이 부품과 동일한지 확인하십시오.”, “부품과 도면 복사”)
Return
End If

‘ 사용자에게 새 파일 이름(도면 번호) 입력 받기
PartNum = InputBox(
“신규 도면번호를 입력하세요” & vbLf & vbLf & _
“기존 모형은 닫히며 신규 모형이 열립니다.” & vbLf & vbLf & _
“진행할까요?”, “신규 도면 생성”)
If PartNum = “” Then Return

‘ 새 파일 경로 구성
NewFileName = ThisDoc.Path & “\” & PartNum

‘ 부품 저장
ThisDoc.Document.SaveAs(NewFileName & “.ipt”, True)

‘ 도면 열기
Dim DrawingDoc As DrawingDocument = ThisApplication.Documents.Open(CurrentFilename & DWGType)

‘ 도면 내 참조 부품을 새 부품으로 교체
Dim oFD As FileDescriptor
oFD = DrawingDoc.ReferencedFileDescriptors(1).DocumentDescriptor.ReferencedFileDescriptor
oFD.ReplaceReference(NewFileName & “.ipt”)
DrawingDoc.Update()

‘ 도면을 새 이름으로 저장
DrawingDoc.SaveAs(NewFileName & “.idw”, False)

‘ 새 부품 파일 열기 및 활성화
ThisApplication.Documents.Open(NewFileName & PRTType)
ThisDoc.Document.Activate

‘ 이전 부품 닫기
ThisDoc.Document.Close

주의 사항

문의

파일 복사 과정에서 문제가 발생하거나 규칙 수정이 필요한 경우 아래 연락처로 문의 부탁드립니다.

담당자 : (주)이디앤씨 기술지원팀 이선준 과장
E-mail : sj.lee@ednc.com

Mobile : 010-3070-7031

답글 남기기