본문 바로가기
  • Welcome!
VBA For Creo

#4 IpfcBaseSession - sub (프로시저)

by ToolBOX01 2021. 1. 11.
반응형

■ sub EraseUndisplayedModels ()

- Creo Parametric 창에서 사용되지 않는 모델을 session에서 지웁니다.  
  (Creo window 리스트에 표시되지 않으면 session에서 지워 집니다.)

Sub EraseModels_Undisplayed()
    Dim asynconn As New pfcls.CCpfcAsyncConnection
    Dim conn As pfcls.IpfcAsyncConnection
    Dim oSession As pfcls.IpfcBaseSession
    
    Set conn = asynconn.Connect("", "", ".", 5)
    Set oSession = conn.session
    
    oSession.EraseUndisplayedModels
     
    conn.Disconnect (2)
    Set asynconn = Nothing
    Set conn = Nothing
    Set session = Nothing
    Set oModel = Nothing

End Sub

 

Sub UIRegisterFileOpen

Sub UIRegisterFileOpen (Options as IpfcFileOpenRegisterOptions, Listener as IpfcFileOpenRegisterListener)
  • 파일 열기 대화 상자에서 파일 형식을 등록합니다.
  • 프로시져(프로그램)를 실행 하면 다음 화면과 같이 표시 됩니다.

사용 예제 코드)

 

화면 UI를 이용하여 파일 오픈 하기

화면에 Open 대화 상자를 통해 파일 이름을 선택 기능 입니다. 클래스 IpfcSession , 함수 UIOpenFile를 사용 합ㄴ다. Return 값은 string 이며 폴더 이름 및 Creo 파일명을 함께 표시 합니다 Return 예시) "C:\Us..

tool-2020.tistory.com

 


Function 함수 이해

 


영업 문의 : lionkk@idt21.com