반응형
■ Creo Window 사이즈
IpfcWindow.Height , IpfcWindow.Width , IpfcWindow.XPos 및 IpfcWindow.YPos 속성 은 각각 창의 높이, 너비, x 위치 및 y 위치를 검색합니다. 이러한 매개변수의 값은 0에서 1로 정규화됩니다.
IpfcWindow.GraphicsAreaHeight 및 IpfcWindow.GraphicsAreaWidth 속성 은 테두리가 없는 Creo Parametric 그래픽 영역 창의 높이와 너비를 각각 검색 합니다. 이러한 매개변수의 값은 0에서 1로 정규화됩니다.
IpfcWindow.GraphicsAreaHeight 및 IpfcWindow.GraphicsAreaWidth 속성 은 테두리가 없는 Creo Parametric 그래픽 영역 창의 높이와 너비를 각각 검색 합니다. 이러한 매개변수의 값은 0에서 1로 정규화됩니다.
>> 코드
Dim oSession As pfcls.IpfcBaseSession: Set oSession = conn.Session
Dim oWindows As IpfcWindow: Set oWindows = oSession.CurrentWindow
With oWindows
Cells(1, "A") = .Height
Cells(2, "A") = .Width
Cells(3, "A") = .XPos
Cells(4, "A") = .YPos
Cells(5, "A") = .GraphicsAreaHeight
Cells(6, "A") = .GraphicsAreaWidth
End With
IpfcWindow.Clear()
- 이 메서드 는 Window에서 지오메트리를 제거합니다.
사용전 | 사용후 |
■ 임베디드 브라우저
IpfcWindow.GetURL() IpfcWindow.SetURL()
메서드 를 사용하면 Creo Parametric 창의 내장 브라우저에 표시되는 URL을 찾고, 변경할 수 있습니다.
>> 코드
Dim oWindows As IpfcWindow
Cells(10, "A") = oWindows.GetURL
>> 코드
oWindows.SetURL ("www.idt21c.com")
■ pan and zoom
IpfcWindow.ScreenTransform - Pan 과 zoom은 Wimdow에서 Matrix(행렬) 입니다. 원점을 기준으로 모델의 X,Y, 확대 비율(?)을 알수 있습니다
>> 코드
현재 Creo 화면의 중심에서 위치한 모델의 X(PanX),Y(PanY), ZOOM값을 가져옵니다, X는 "-1 ~ 1" 사이 값을 표시 합니다.
Y는 "-1 ~ 1" 사이 값을 표시 합니다. ZOOM은 "0 ~ 10 " 사이 값 입니다.
Dim oWindows As IpfcWindow
Set oWindows = oSession.CurrentWindow
Dim oZoomWindow As IpfcScreenTransform
Set oZoomWindow = oWindows.ScreenTransform
Cells(10, "B") = oZoomWindow.PanX
Cells(11, "B") = oZoomWindow.PanY
Cells(12, "B") = oZoomWindow.Zoom
PanX : 0 / PanY : 0 / Zoom : 1 | PanX : 0 94 / PanY : 0.53 / Zoom : 0.32 |
By lionkk@idt21c.com
'VBA For Creo' 카테고리의 다른 글
Webgl Test] Creo 파일 Web 브라우저 게시 (0) | 2023.01.17 |
---|---|
IpfcViewOwner (0) | 2023.01.16 |
엑셀에서 치수값을 입력 하여 모델 변경 하기 (0) | 2023.01.14 |
모델이 가지고 있는 치수 값을 가지고 오기 (0) | 2023.01.14 |
Creo VBA 시작 코드 (0) | 2023.01.14 |