파이썬 - 아래한글 (KeyIndicator) 마티니님.. 블로그 보고... 난 나중에 까먹을까봐 블로그에 올려놓기로..... ^^ 파이썬에서 아래한글 상태바(?)의 코드를 확인 하는 함수. 종류별로 리턴해서 하면 편할거 같은데 귀찮아서 그냥 page = hwp.KeyIndicator()[3] 이런식으로 페이지 확인하고 있다. ㅋ def view_hwpKeyIndicator(self): global hwp print(hwp.KeyIndicator()) print(' 0 : ', hwp.KeyIndicator()[0]) print(' 1 : ', hwp.KeyIndicator()[1]) print('구 역 : ', hwp.KeyIndicator()[2]) print('페이지 : ', hwp.KeyIndicator()[3]) print('다 단 : ',.. Windows 7 에서 바로가기로 글꼴설치하기 Windows 7 에서 바로가기로 글꼴설치하기 글꼴 선택후 마우스 오른쪽 버튼 클릭후 "바로가기로 설치" 선택하여 설치 * 만약 바로가기로 설치 항목이 표시되지 않는다면 제어판 - 모든 제어판 항목 - 글꼴 - 글꼴설정 에서 "바로 가기를 사용하여..." 를 체크하여 주시면 됩니다. 24인치 WIDE LCD - OR2407W 한참을 쓰다 1년여 쓴줄 알았는데 09년 모델이네 모니터 스탠드 지르고 때문에 디카로 사진한방 찍고 나서 보니 2009년 4월에 찍었던 사진이. ㅋ 좌측-오리온 정보통신 TOPSYNC OR2407W / 우측 삼성 싱크마스터 17인치 CRTㅋ 원래 기본으로 달려나온 까맣고 넓은 스탠드 핸드폰도, 스피커도 바뀌었군 ㅎㅎ 아래는 스탠드 바꾸고 기념으로 인증샷 한방 (느낌은 기존 스탠드가 더 좋은거 같아............) 모니터 화면이 너무하얗다.. 전에는 어떻게 찍었을까.. 디카는 같은건데 ㅎㅎㅎ 뱀부 타블렛이 조금 늦은 2009년 7월에 질렀었군.. ㅋㅋ 스피커는 언제였을까...ㅎㅎㅎㅎ 피벗 후 다시 한방 근데 한가지 불편한건 피벗할때마다 그냥 돌리면 모서리가 스탠드에 닿아서 아래쪽을 앞으로 땡겨서(틸.. 오리온정보통신 다기능스탠드 (OR2407W 사용중..) 모니터 받침대 지름! 오리온정보통신 OR2407W 모니터 사용중.. (2009년 4월 모델이네.. 일케 오래썼나? 처음에 글래어 패널에 불량화소 있어서 바로 논글레어 패널로 교체했었는데 그때 바로 처리해주는 A/S 엄창 맘에 들었었음. 대부분 인터넷에도 A/S 괜찮다는 평이 많았었는데 요즘은 A/S에 대한 불만도 많이 보이는듯...) 틸트기능만 지원되는 기본 스탠드에서 피벗, 스위블, 엘리베이션, 틸트까지 되는 다기능 스탠드를 지름~ 다른모델들 더 싼것도 있었는데(다나와에는 단종으로 표기되고..) 같은회사에서 구매하는게 나사조합이나 디자인 등 여러가지면에서 좋지 않을까 싶어서 오리온정보통신 고객센터에 전화해서 주문. 4만원~(택배비 별도) 기존 스탠드는 우짜지? -_-;; 티스토리 가로폭이 제한이 있네... DIN Medium, DINMittelschrift 영문폰트 DIN Medium 영문폰트 DINMittelschrift 영문폰트 뱀부와 뱀부펀..... 집에서는 뱀부 사무실에서는 뱀부펀 처음엔 몰랐는데 펜 그립감이 확 다르다... 뭐 그것 말고도 다른건 많지만.............ㅋ CAD - VBA를 이용한 TextStyle 설정 Sub textstylelist() Dim textStyle As AcadTextStyle Dim fontfilename As String Dim bigfontfilename As String Dim Stylename As String Dim newFontFile, newbigFontFile As String Dim StyleCount As Integer Dim i As Integer Set AcadApp = GetObject(, "AutoCad.Application") AppActivate AcadApp.Caption '오토캐드 창 활성화시키기 (윗줄까지 2줄 필요) 'Set textStyle = ThisDrawing.ActiveTextStyle '현재설정된 TextStyle 로 '정의된 TextSty.. CAD - VBA를 이용하여 현재 설정된 용지의 이름 알아내기 Sub Example_CanonicalMediaName() ' This example finds the name of the media for the active layout ' 현재 설정된 프린터의 용지크기 의 실제 이름 알아내기 Dim MediaName As String MediaName = ThisDrawing.ActiveLayout.CanonicalMediaName If MediaName = "" Then MsgBox "There is no media set for the active layout." Else MsgBox "The media for the active layout is: " & MediaName End If End Sub 이전 1 2 3 다음
