윈도우 COM(컴포넌트 오브젝트 모델: 위키백과)은 COM 기반으로 구현한  외부 오브젝트들과 연동하기 위한 인터페이스입니다.

예를 들어 오피스(엑셀, 워드 등)에서 COM을 제공하기 때문에 COM 인터페이스를 이용해 엑셀과 워드등을 제어할 수 있습니다.

 - Delphi and Microsoft Office: Automating Excel and Word:  http://edn.embarcadero.com/article/10128

 

COM 오브젝트 연동 방법

델파이에서 COM 오브젝트 연동은 CreateOleObject 메소드를 이용해 구현하는 방식과 "Type Library"를 이용하는 2가지 방식이 있습니다.

1) CreateOleObject 메소드 이용해 구현하는 방식

CreateOleObject를 이용하는 방법은 아래와 같이 가변형(Variant) 변수에 CreateOleObject 메소드를 이용해 인스턴스를 만들어 구현할 수 있습니다.

이방식의 단점은 해당 COM 라이브러리가 제공하는 인터페이스(메소드, 상수, 클래스)를 제작사가 제공해주는 문서등을 통해 파악해야만 개발할 수 있고, 코딩 및 컴파일 시에는 오류를 확인할 수 없고, 해당 코드를 실행시에 오류를 확인할 수 있습니다.

var
  Nat, Ports: Variant;
begin
    NAT   := CreateOleObject ( 'HNetCfg.NATUPnP' );

2) Type Library 메소드를 이용해 구현하는 방식

델파이의 "Import a Type Library"  기능을 이용해 델파이로 된 COM 인터페이스 파일(소스코드)를 생성 후, 해당 파일을 이용해 기능을 구현하는 방식입니다.

COM 인터페이스 소스파일에는 COM 인터페이스가 제공하는 메소드와 상수가 정의되어 있어, 제공하는 기능을 파악할 수 있다는 장점이 있습니다.

 

사용방법 소개

이곳 테크게시판에 올라온 질문을 토대로 사용법을 소개합니다.

http://tech.devgear.co.kr/delphi_qna/425954

질문요약. 

UPnP를 구현하려고 아래와 같은 코드를 사용했습니다.

var
  Nat, Ports: Variant;
begin
    NAT   := CreateOleObject ( 'HNetCfg.NATUPnP' );
    Ports := NAT.StaticPortMappingCollection;
 

위 질문에서는 "HNetCfg.NATUPnP" 클래스 이름을 갖는 COM을 이용해 UPnP를 구현하려고 합니다.

 

위와 같이 Variant 변수를 이용해 COM을 구현할 수 있습니다. COM의 인터페이스를 잘 알고 있다면

해당 COM이 어떤 메소드를 갖고 있는지 알 수 없기 때문에 구현이 어렵고 제한적일 수 밖에 없습니다.

Import a Type Library 기능을 이용해 UPnP 구현하는 방법을 소개합니다.

 

1, COM을 제공하는 dll 찾기

클래스 이름(HNetCfg.NATUPnP)으로 검색해 아래 문서를 통해  Hnetcfg.dll을 사용한다는 정보를 알아냈습니다.

https://msdn.microsoft.com/ko-kr/library/windows/desktop/aa366182(v=vs.85).aspx

 

2, COM 인터페이스 파일 생성하기

1) Component > Import Components.. 메인메뉴를 선택합니다.

2) 컴포넌트 타입(Type of Component)에서 Import a Type Library

3) Add 버튼을 클릭하고, 추가할 라이브러리(C:\Windows\System32\Hnetcfg.dll)를 선택합니다.

4) 또는 이미 등록된 경우 등록된 항목을 선택합니다.hnetcfg01.png

 

4) 경로지정

소스코드를 저장할 경로(Unit Dir Name)를 지정합니다.(경로는 중요하지 않습니다. 생성한 소스를 이동 후에도 사용 가능합니다.)

hnetcfg02.png

 

 

5) 유닛 생성

hnetcfg03.png

 

6) 생성된 소스코드(XXXX_TLB.pas)를 이용해 기능을 구현합니다.

hnetcfg04.png

 

위에서 생성한 인터페이스 파일은 말그대로 COM 오브젝트의 인터페이스와 클래스가 정의되어 있습니다.

클래스를 사용하면 제공되는 메소드와 인터페이스 구조를 코딩 시점에 파악할 수 있어 더욱 쉽게 구현할 수 있을 것입니다.

 

COM 오브젝트의 사용법 등은 제작사에서 제공하는 문서를 참고하시기 바랍니다.

번호 제목 글쓴이 날짜 조회 수
공지 [DelphiCon 요약] 코드사이트 로깅 실전 활용 기법 (Real-world CodeSite Logging Techniques) 관리자 2021.01.19 15417
공지 [UX Summit 요약] 오른쪽 클릭은 옳다 (Right Click is Right) 관리자 2020.11.16 13960
공지 [10.4 시드니] What's NEW! 신기능 자세히 보기 관리자 2020.05.27 16496
공지 RAD스튜디오(델파이,C++빌더) - 고객 사례 목록 관리자 2018.10.23 22049
공지 [데브기어 컨설팅] 모바일 앱 & 업그레이드 마이그레이션 [1] 관리자 2017.02.06 23267
공지 [전체 목록] 이 달의 기술자료 & 기술레터 관리자 2017.02.06 18921
공지 RAD스튜디오(델파이, C++빌더) - 시작하기 [1] 관리자 2015.06.30 39245
공지 RAD스튜디오(델파이,C++빌더) - 모바일 앱 개발 사례 (2020년 11월 업데이트 됨) 험프리 2014.01.16 174696
534 퀵레포트 보고서 엑셀로 내보내기(저장하기) [1] 험프리 2016.08.01 1661
533 [20140610 온라인 세미나 발표자료] 처음 만나는: RAD Studio XE6, Delphi XE6, C++Builder XE6 file 관리자 2014.06.14 1652
532 [XE8] 대화형 지도 컴포넌트로 구글맵과 애플 맵킷 한번에 사용하기 Humphery 2015.04.17 1650
531 RAD 스튜디오 - 사물인터넷 관련기술과 고객사례 험프리 2017.10.31 1644
530 코드 아카데미: 세션1. BaaS와 Kinvey 자세히 알아보기(2014.7.29) 관리자 2014.07.30 1634
529 [RAD서버] EMS 패키지 프로젝트 시작하기 험프리 2017.04.28 1626
528 [10.4 프리뷰] 베타 서비스 시작 & 새 기능 미리 보기 관리자 2020.03.03 1612
527 C++빌더와 델파이를 이용한 SHA 해시 file 김원경 2018.05.21 1607
526 코드 아카데미: 세션3. 클라우드 기반 스토리지 (2014.8.12) 관리자 2014.08.18 1586
525 [FireDAC Skill Sprints] 1. FireDAC 소개 험프리 2015.04.01 1580
524 [코드레이지11] 인공지능(AI) with 델파이 & C++빌더 - Boian Mitov [1] 험프리 2016.11.24 1579
523 나의 첫 윈도우/맥 애플리케이션 개발하기: 파이어몽키 코스북 2장 file 관리자 2014.07.11 1579
522 [업데이트][10 시애틀] RAD Studio 10 시애틀 서브스크립션 업데이트 1 [3] file 험프리 2015.11.25 1571
521 Developer Direct Live in 부산(5/20 세미나 발표자료) [1] file Humphery 2014.05.21 1567
520 [고객 사례- 박물관, RAD Studio+비콘] 사이토바루 고고학 박물관 – 비콘 활용 솔루션 관리자 2016.11.04 1563
519 네이티브 IOS & 안드로이드 앱 만들기 첫 걸음 관리자 2021.06.09 1559
518 iOS 64bit 배포 시 ITMS-90092 오류 대응 [1] file Humphery 2015.04.09 1557
517 [개발환경] RAD 스튜디오에서 Git 설정 및 불러오기(2) 험프리 2019.06.20 1557
516 [업데이트][10.2 도쿄][릴리즈 1] 10.2 도쿄 - 릴리즈 1이 출시되었습니다. 험프리 2017.08.09 1550
515 [안드로이드/iOS] 이미 배포(Deployment)된 파일 업데이트 하기 험프리 2016.03.31 1537