dlgproxy.cpp

VB Script脚本引擎及例子程序

// DlgProxy.cpp : implementation file
//

#include "stdafx.h"
#include "test2.h"
#include "DlgProxy.h"
#include "test2Dlg.h"

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

/////////////////////////////////////////////////////////////////////////////
// CTest2DlgAutoProxy

IMPLEMENT_DYNCREATE(CTest2DlgAutoProxy, CCmdTarget)

CTest2DlgAutoProxy::CTest2DlgAutoProxy()
{
	EnableAutomation();
	
	// To keep the application running as long as an automation 
	//	object is active, the constructor calls AfxOleLockApp.
	AfxOleLockApp();

	// Get access to the dialog through the application's
	//  main window pointer.  Set the proxy's internal pointer
	//  to point to the dialog, and set the dialog's back pointer to
	//  this proxy.
	ASSERT (AfxGetApp()->m_pMainWnd != NULL);
	ASSERT_VALID (AfxGetApp()->m_pMainWnd);
	ASSERT_KINDOF(CTest2Dlg, AfxGetApp()->m_pMainWnd);
	m_pDialog = (CTest2Dlg*) AfxGetApp()->m_pMainWnd;
	m_pDialog->m_pAutoProxy = this;
}

CTest2DlgAutoProxy::~CTest2DlgAutoProxy()
{
	// To terminate the application when all objects created with
	// 	with automation, the destructor calls AfxOleUnlockApp.
	//  Among other things, this will destroy the main dialog
	if (m_pDialog != NULL)
		m_pDialog->m_pAutoProxy = NULL;
	AfxOleUnlockApp();
}

void CTest2DlgAutoProxy::OnFinalRelease()
{
	// When the last reference for an automation object is released
	// OnFinalRelease is called.  The base class will automatically
	// deletes the object.  Add additional cleanup required for your
	// object before calling the base class.

	CCmdTarget::OnFinalRelease();
}

BEGIN_MESSAGE_MAP(CTest2DlgAutoProxy, CCmdTarget)
	//{{AFX_MSG_MAP(CTest2DlgAutoProxy)
		// NOTE - the ClassWizard will add and remove mapping macros here.
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

BEGIN_DISPATCH_MAP(CTest2DlgAutoProxy, CCmdTarget)
	//{{AFX_DISPATCH_MAP(CTest2DlgAutoProxy)
		// NOTE - the ClassWizard will add and remove mapping macros here.
	//}}AFX_DISPATCH_MAP
END_DISPATCH_MAP()

// Note: we add support for IID_ITest2 to support typesafe binding
//  from VBA.  This IID must match the GUID that is attached to the 
//  dispinterface in the .ODL file.

// {BE2FE5C7-24E2-11D5-AECF-0050BACEC5F7}
static const IID IID_ITest2 =
{ 0xbe2fe5c7, 0x24e2, 0x11d5, { 0xae, 0xcf, 0x0, 0x50, 0xba, 0xce, 0xc5, 0xf7 } };

BEGIN_INTERFACE_MAP(CTest2DlgAutoProxy, CCmdTarget)
	INTERFACE_PART(CTest2DlgAutoProxy, IID_ITest2, Dispatch)
END_INTERFACE_MAP()

// The IMPLEMENT_OLECREATE2 macro is defined in StdAfx.h of this project
// {BE2FE5C5-24E2-11D5-AECF-0050BACEC5F7}
IMPLEMENT_OLECREATE2(CTest2DlgAutoProxy, "Test2.Application", 0xbe2fe5c5, 0x24e2, 0x11d5, 0xae, 0xcf, 0x0, 0x50, 0xba, 0xce, 0xc5, 0xf7)

/////////////////////////////////////////////////////////////////////////////
// CTest2DlgAutoProxy message handlers