ActiveX/DCOM/ATL

开发平台：
Visual C++

Use4Dlg.cpp：源码内容
							// Use4Dlg.cpp : implementation file
//
#include "stdafx.h"
#include "Use4.h"
#include "Use4Dlg.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
/////////////////////////////////////////////////////////////////////////////
// CUse4Dlg dialog
CUse4Dlg::CUse4Dlg(CWnd* pParent /*=NULL*/)
	: CDialog(CUse4Dlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CUse4Dlg)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}
void CUse4Dlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CUse4Dlg)
		// NOTE: the ClassWizard will add DDX and DDV calls here
	//}}AFX_DATA_MAP
}
BEGIN_MESSAGE_MAP(CUse4Dlg, CDialog)
	//{{AFX_MSG_MAP(CUse4Dlg)
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BUTTON7, OnButton7)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()
/////////////////////////////////////////////////////////////////////////////
// CUse4Dlg message handlers
BOOL CUse4Dlg::OnInitDialog()
{
	CDialog::OnInitDialog();
	// Set the icon for this dialog.  The framework does this automatically
	//  when the application's main window is not a dialog
	SetIcon(m_hIcon, TRUE);			// Set big icon
	SetIcon(m_hIcon, FALSE);		// Set small icon
	
	// TODO: Add extra initialization here
	
	return TRUE;  // return TRUE  unless you set the focus to a control
}
// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.
void CUse4Dlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting
		SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);
		// Center icon in client rectangle
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;
		// Draw the icon
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}
// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CUse4Dlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}
void CUse4Dlg::OnButton7()		// #import 的使用
{
/**********************************************************
1. 在CUse4App::InitInstance() 中使用 AfxOleInit() 进行初始化
2. 打开 stdafx.h 插入 #import 语句，先编译
   则产生 .tlh 和 .tlh 文件的智能指针包装
3. #import 使用了 no_namespace 表示不使用命名空间
4. 智能指针包装形式为: IxxxPtr，xxx 表示接口名
***********************************************************/
	IFunPtr spFun;
	HRESULT hr = spFun.CreateInstance( L"Simple1.fun.1" );	// 使用 ProgID
//	HRESULT hr = spFun.CreateInstance( __uuidof( Fun ) );	// 使用 CLSID
	ASSERT( SUCCEEDED( hr ) );
	try
	{
		long nSum = spFun->Add( 1, 2 );
		CString sMsg;
		sMsg.Format( _T("1+2=%d"), nSum );
		AfxMessageBox( sMsg );
		_bstr_t sCat = spFun->Cat( _T("Hello"), _T(" world") );
		AfxMessageBox( sCat );
	}
	catch( _com_error &e )
	{
		// 在这里可以取得详细的错误信息
		// 以后在介绍 ISupportErrorInfo 接口中详细说明
//		e.Description();
//		e.ErrorMessage();
//		e.ErrorInfo();
//		......
		e;	// 由于没有使用e，加上这个只是为了取消编译警告
		AfxMessageBox( _T("Error") );
	}
}

						