반응형
■ 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)
- 파일 열기 대화 상자에서 파일 형식을 등록합니다.
- 프로시져(프로그램)를 실행 하면 다음 화면과 같이 표시 됩니다.
사용 예제 코드)
Function 함수 이해
영업 문의 : lionkk@idt21.com
'VBA For Creo' 카테고리의 다른 글
#4 IpfcBaseSession - 지정된 디렉토리의 파일 목록 찾기 (0) | 2021.01.12 |
---|---|
VBA 기본 문법 (0) | 2021.01.12 |
#2 IpfcBaseSession 이해 - Function 이해 (0) | 2021.01.11 |
#1 IpfcBaseSession 클래스 이해 - Sub ChangeDirectory (0) | 2021.01.11 |
Creo VBA 프로그래밍 고려 사항 (0) | 2021.01.10 |