윈도우 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 14390
공지 [UX Summit 요약] 오른쪽 클릭은 옳다 (Right Click is Right) 관리자 2020.11.16 13023
공지 [10.4 시드니] What's NEW! 신기능 자세히 보기 관리자 2020.05.27 15532
공지 RAD스튜디오(델파이,C++빌더) - 고객 사례 목록 관리자 2018.10.23 21065
공지 [데브기어 컨설팅] 모바일 앱 & 업그레이드 마이그레이션 [1] 관리자 2017.02.06 22297
공지 [전체 목록] 이 달의 기술자료 & 기술레터 관리자 2017.02.06 17933
공지 RAD스튜디오(델파이, C++빌더) - 시작하기 [1] 관리자 2015.06.30 38228
공지 RAD스튜디오(델파이,C++빌더) - 모바일 앱 개발 사례 (2020년 11월 업데이트 됨) 험프리 2014.01.16 173741
633 [10.4 시드니][패치] RAD스튜디오 10.4 '두 번째 패치(Patch 2)'를 다운로드 받으세요! 관리자 2020.07.20 913
632 OAuth 2.0 연동 - 네이버 API 연동(네이버 아이디로 로그인) 험프리 2020.07.15 1172
631 RAD Studio의 생산성 툴링 : 탐색기 김원경 2020.07.09 352
630 RAD Studio의 생산성 툴링 : 북마크 김원경 2020.07.09 355
629 [2020년 상반기] 기술자료 TOP 10 - 개발자들이 가장 많이 클릭한 기술자료는? 관리자 2020.07.07 657
628 이 달의 기술자료 - 2020년 07월 험프리 2020.06.25 462
627 [발표자료] 20200623 코로나19, 데이터와 RAD로 방역하다! file 관리자 2020.06.24 698
626 [10.4 시드니 신기능 Deep Dive] 겟잇 패키지 매니저의 새로운 기능들 관리자 2020.06.22 559
625 북마크, 탐색기 - 무료 IDE 애드온 기능들 업데이트! (10.4용) 관리자 2020.06.16 404
624 [REST-무료제공툴] REST 디버거 - REST 서비스를 언제든 신속하게 분석할 수 있습니다. file 험프리 2020.06.15 1004
623 [발표자료] 20200609 What's NEW! RAD스튜디오 10.4 시드니 file 관리자 2020.06.10 478
622 [10.4 시드니 신기능 Deep Dive] 델파이 추가된 문법 및 변경 사항 김원경 2020.06.05 489
621 [10.4 시드니 신기능] iOS와 맥OS 지원 강화 관리자 2020.06.04 673
620 [10.4 시드니 신기능] 고해상도 DPI용 VCL 콘트롤(들) 관리자 2020.06.04 495
619 [10.4 시드니 신기능] 개발환경 강화 관리자 2020.06.04 442
618 [RAD Studio 10.4 패치1 ] C ++ 디버깅과 누락 파일 패치 – 패치를 설치하는 새로운 방법! file 김원경 2020.06.01 635
617 이 달의 기술자료 - 2020년 06월 file 험프리 2020.05.29 358
616 [10.4 시드니 신기능] 델파이 10.4 런타임 라이브러리 향상 file 김원경 2020.05.28 611
615 [10.4 시드니 신기능] Sarina Dupont이 정리한 주요 신기능 모아 보기 험프리 2020.05.28 4295