registerocxdlg.cpp

用vc实现ocx控件的注册

// RegisterOcxDlg.cpp : implementation file
//

#include "stdafx.h"
#include "RegisterOcx.h"
#include "RegisterOcxDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

#ifdef _WIN32
#define LOADLIBRARY_FAILED(x) (x == 0)
#else
#define LOADLIBRARY_FAILED(x) (x <= HINSTANCE_ERROR)
#endif


/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

//定义函数地址
STDAPI DllRegisterServer(void) ;
STDAPI DllUnregisterServer(void) ;
typedef HRESULT (STDAPICALLTYPE *CTLREGPROC)();

class CAboutDlg : public CDialog
{
public:
	CAboutDlg();

// Dialog Data
	//{{AFX_DATA(CAboutDlg)
	enum { IDD = IDD_ABOUTBOX };
	//}}AFX_DATA

	// ClassWizard generated virtual function overrides
	//{{AFX_VIRTUAL(CAboutDlg)
	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
	//}}AFX_VIRTUAL

// Implementation
protected:
	//{{AFX_MSG(CAboutDlg)
	//}}AFX_MSG
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
	//{{AFX_DATA_INIT(CAboutDlg)
	//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CAboutDlg)
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
	//{{AFX_MSG_MAP(CAboutDlg)
		// No message handlers
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CRegisterOcxDlg dialog

CRegisterOcxDlg::CRegisterOcxDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CRegisterOcxDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CRegisterOcxDlg)
		// 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 CRegisterOcxDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CRegisterOcxDlg)
		// NOTE: the ClassWizard will add DDX and DDV calls here
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CRegisterOcxDlg, CDialog)
	//{{AFX_MSG_MAP(CRegisterOcxDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_REGISTER, OnRegister)
	ON_BN_CLICKED(IDC_UNREGISTER, OnUnregister)
	ON_WM_DESTROY()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CRegisterOcxDlg message handlers

BOOL CRegisterOcxDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// Add "About..." menu item to system menu.

	// IDM_ABOUTBOX must be in the system command range.
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);

	CMenu* pSysMenu = GetSystemMenu(FALSE);
	if (pSysMenu != NULL)
	{
		CString strAboutMenu;
		strAboutMenu.LoadString(IDS_ABOUTBOX);
		if (!strAboutMenu.IsEmpty())
		{
			pSysMenu->AppendMenu(MF_SEPARATOR);
			pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
		}
	}

	// 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
}

void CRegisterOcxDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
	{
		CAboutDlg dlgAbout;
		dlgAbout.DoModal();
	}
	else
	{
		CDialog::OnSysCommand(nID, lParam);
	}
}

// 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 CRegisterOcxDlg::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 CRegisterOcxDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}


void CRegisterOcxDlg::OnRegister() 
{
	//过滤字符串
	static char BASED_CODE szFilter[] = "OLE controls(*.ocx)|*.ocx|DLL's(*.dll)|*.dll|OCX and DLL(*.ocx; *.dll)|*.ocx;*.dll|All Files (*.*)| *.*||";
	
	//构造打开文件对话框
	CFileDialog aDlg(
		TRUE,
		"OCX",
		"*.ocx",
		OFN_PATHMUSTEXIST |OFN_FILEMUSTEXIST,
		szFilter,
		this ) ;
	
	//寻找要注册的控件文件
	if (aDlg.DoModal() == IDOK)
	{
		if (Register(aDlg.GetPathName()))
		{
			MessageBox( "Successful control registration.",
				"Control Registration.",
				MB_OK | MB_ICONINFORMATION) ;
		}
		else
		{
			MessageBox( "Control registration failed.",
				NULL,
				MB_OK | MB_ICONEXCLAMATION) ;
		}
	}
	
}

void CRegisterOcxDlg::OnUnregister() 
{
	//过滤字符串
	static char BASED_CODE szFilter[] = "OLE controls(*.ocx)|*.ocx|DLL's(*.dll)|*.dll|OCX and DLL(*.ocx; *.dll)|*.ocx;*.dll|All Files (*.*)| *.*||";
	
	//构造打开文件对话框
	CFileDialog aDlg( 
		TRUE,
		"OCX",
		"*.ocx",
		OFN_PATHMUSTEXIST |OFN_FILEMUSTEXIST,
		szFilter,
		this ) ;
	//寻找要卸载的控件文件
	if (aDlg.DoModal() == IDOK)
	{
		if (UnRegister(aDlg.GetPathName()))
		{
			MessageBox( "Successful control registration.",
				"Control Registration.",
				MB_OK | MB_ICONINFORMATION) ;
		}
		else
		{
			MessageBox( "Control registration failed.",
				NULL,
				MB_OK | MB_ICONEXCLAMATION) ;
		}
	}
}

//注册控件
BOOL CRegisterOcxDlg::Register(CString strOcxPath)
{
	BOOL bResult = FALSE ;
	//检查是否支持注册
	if (SupportsSelfRegister(strOcxPath))
	{
		HMODULE hModule = ::LoadLibrary(strOcxPath) ;
		if (LOADLIBRARY_FAILED(hModule)) return FALSE ;
	
		//获得注册函数地址
		CTLREGPROC DLLRegisterServer =
            (CTLREGPROC)::GetProcAddress(hModule,"DllRegisterServer" ) ;
		if (DLLRegisterServer != NULL)
		{
			HRESULT regResult = DLLRegisterServer() ;
			bResult = (regResult == NOERROR) ; 
		}
		::FreeLibrary(hModule) ;
	}
	return bResult ;

}

//卸载控件
BOOL CRegisterOcxDlg::UnRegister(CString strOcxPath)
{
	BOOL bResult = FALSE ;
	//检查是否支持注册
	if (SupportsSelfRegister(strOcxPath))
	{
		HMODULE hModule = ::LoadLibrary(strOcxPath) ;
		if (LOADLIBRARY_FAILED(hModule)) return FALSE ;
		
		//获得卸载函数地址
		CTLREGPROC DLLUnregisterServer =
            (CTLREGPROC)::GetProcAddress( hModule,
			"DllUnregisterServer" ) ;
		if (DLLUnregisterServer != NULL)
		{
			HRESULT regResult = DLLUnregisterServer() ;
			bResult = (regResult == NOERROR) ; 
		}
		::FreeLibrary(hModule) ;
	}
	return bResult ;


}
//检查控件是否支持注册
BOOL CRegisterOcxDlg::SupportsSelfRegister(CString strOcxPath)
{
	BOOL bResult = FALSE;
	DWORD  handle;
	UINT  uiInfoSize;
	UINT  uiVerSize ;
	UINT  uiSize ;
	BYTE* pbData = NULL ;
	DWORD* lpBuffer;;
	char szName[512] ;
	
	//获得文件大小信息
	uiInfoSize = 
		::GetFileVersionInfoSize(strOcxPath.GetBuffer(0),
		&handle);
	if (uiInfoSize == 0) return FALSE ;

	pbData = new BYTE[uiInfoSize] ;
	
	//获得文件信息
	bResult = 
		::GetFileVersionInfo(strOcxPath.GetBuffer(0),
		handle,
		uiInfoSize,
		pbData);
	if (!bResult) goto NastyGoto ;
	
	//在注册表中找
	bResult = 
		::VerQueryValue( pbData,
		"\\VarFileInfo\\Translation",
		(void**)&lpBuffer,
		&uiVerSize);
	if (!bResult) goto NastyGoto ;
	
	bResult = uiVerSize ;
	if (!bResult) goto NastyGoto ;
	
	// Build the path to the OLESelfRegister key
	// using the translation information.
	sprintf( szName,
		"\\StringFileInfo\\%04hX%04hX\\OLESelfRegister",
		LOWORD(*lpBuffer),
		HIWORD(*lpBuffer)) ;
	
	// Search for the key.
	bResult = ::VerQueryValue( pbData, 
		szName, 
		(void**)&lpBuffer, 
		&uiSize);
	
NastyGoto:
	delete [] pbData ;
	return bResult ;
}

void CRegisterOcxDlg::OnDestroy() 
{
	OleUninitialize();
	
	CDialog::OnDestroy();
}