ptnatcommctrl.cpp

收发短信ocx控件

// PTNAtCommCtrl.cpp : CPTNAtCommCtrl ActiveX 控件类的实现。

#include "stdafx.h"
#include "PTNAtComm.h"
#include "PTNAtCommCtrl.h"
#include "PTNAtCommPropPage.h"


#ifdef _DEBUG
#define new DEBUG_NEW
#endif


IMPLEMENT_DYNCREATE(CPTNAtCommCtrl, COleControl)



// 消息映射

BEGIN_MESSAGE_MAP(CPTNAtCommCtrl, COleControl)
	ON_OLEVERB(AFX_IDS_VERB_PROPERTIES, OnProperties)
END_MESSAGE_MAP()



// 调度映射

BEGIN_DISPATCH_MAP(CPTNAtCommCtrl, COleControl)
	DISP_FUNCTION_ID(CPTNAtCommCtrl, "AboutBox", DISPID_ABOUTBOX, AboutBox, VT_EMPTY, VTS_NONE)
	DISP_FUNCTION_ID(CPTNAtCommCtrl, "GetCommName", dispidGetCommName, GetCommName, VT_BSTR, VTS_NONE)
	DISP_PROPERTY_NOTIFY_ID(CPTNAtCommCtrl, "CommSeq", dispidCommSeq, m_CommSeq, OnCommSeqChanged, VT_BSTR)
	DISP_PROPERTY_EX_ID(CPTNAtCommCtrl, "Comm", dispidComm, GetComm, SetComm, VT_BSTR)
END_DISPATCH_MAP()



// 事件映射

BEGIN_EVENT_MAP(CPTNAtCommCtrl, COleControl)
END_EVENT_MAP()



// 属性页

// TODO: 按需要添加更多属性页。请记住增加计数!
BEGIN_PROPPAGEIDS(CPTNAtCommCtrl, 1)
	PROPPAGEID(CPTNAtCommPropPage::guid)
END_PROPPAGEIDS(CPTNAtCommCtrl)



// 初始化类工厂和 guid

IMPLEMENT_OLECREATE_EX(CPTNAtCommCtrl, "PTNATCOMM.PTNAtCommCtrl.1",
	0xcd682c95, 0x8512, 0x4c34, 0x98, 0xcd, 0xe9, 0xdf, 0xed, 0xc1, 0x96, 0x1e)



// 键入库 ID 和版本

IMPLEMENT_OLETYPELIB(CPTNAtCommCtrl, _tlid, _wVerMajor, _wVerMinor)



// 接口 ID

const IID BASED_CODE IID_DPTNAtComm =
		{ 0xA5D3E6AC, 0xF96, 0x4574, { 0x9B, 0x96, 0x53, 0x7A, 0x52, 0x66, 0xDD, 0xB8 } };
const IID BASED_CODE IID_DPTNAtCommEvents =
		{ 0xA4EBE927, 0x9498, 0x4F27, { 0x82, 0xD1, 0x59, 0x7E, 0xA3, 0x63, 0xAA, 0x9B } };



// 控件类型信息

static const DWORD BASED_CODE _dwPTNAtCommOleMisc =
	OLEMISC_ACTIVATEWHENVISIBLE |
	OLEMISC_SETCLIENTSITEFIRST |
	OLEMISC_INSIDEOUT |
	OLEMISC_CANTLINKINSIDE |
	OLEMISC_RECOMPOSEONRESIZE;

IMPLEMENT_OLECTLTYPE(CPTNAtCommCtrl, IDS_PTNATCOMM, _dwPTNAtCommOleMisc)



// CPTNAtCommCtrl::CPTNAtCommCtrlFactory::UpdateRegistry -
// 添加或移除 CPTNAtCommCtrl 的系统注册表项

BOOL CPTNAtCommCtrl::CPTNAtCommCtrlFactory::UpdateRegistry(BOOL bRegister)
{
	// TODO: 验证您的控件是否符合单元模型线程处理规则。
	// 有关更多信息，请参考 MFC 技术说明 64。
	// 如果您的控件不符合单元模型规则，则
	// 必须修改如下代码，将第六个参数从
	// afxRegApartmentThreading 改为 0。

	if (bRegister)
		return AfxOleRegisterControlClass(
			AfxGetInstanceHandle(),
			m_clsid,
			m_lpszProgID,
			IDS_PTNATCOMM,
			IDB_PTNATCOMM,
			afxRegApartmentThreading,
			_dwPTNAtCommOleMisc,
			_tlid,
			_wVerMajor,
			_wVerMinor);
	else
		return AfxOleUnregisterClass(m_clsid, m_lpszProgID);
}



// 授权字符串

static const TCHAR BASED_CODE _szLicFileName[] = _T("PTNAtComm.lic");

static const WCHAR BASED_CODE _szLicString[] =
	L"Copyright (c) 2009 ";



// CPTNAtCommCtrl::CPTNAtCommCtrlFactory::VerifyUserLicense -
// 检查是否存在用户许可证

BOOL CPTNAtCommCtrl::CPTNAtCommCtrlFactory::VerifyUserLicense()
{
	return AfxVerifyLicFile(AfxGetInstanceHandle(), _szLicFileName,
		_szLicString);
}



// CPTNAtCommCtrl::CPTNAtCommCtrlFactory::GetLicenseKey -
// 返回运行时授权密钥

BOOL CPTNAtCommCtrl::CPTNAtCommCtrlFactory::GetLicenseKey(DWORD dwReserved,
	BSTR FAR* pbstrKey)
{
	if (pbstrKey == NULL)
		return FALSE;

	*pbstrKey = SysAllocString(_szLicString);
	return (*pbstrKey != NULL);
}



// CPTNAtCommCtrl::CPTNAtCommCtrl - 构造函数

CPTNAtCommCtrl::CPTNAtCommCtrl()
{
	InitializeIIDs(&IID_DPTNAtComm, &IID_DPTNAtCommEvents);
	// TODO: 在此初始化控件的实例数据。
}



// CPTNAtCommCtrl::~CPTNAtCommCtrl - 析构函数

CPTNAtCommCtrl::~CPTNAtCommCtrl()
{
	// TODO: 在此清理控件的实例数据。
}



// CPTNAtCommCtrl::OnDraw - 绘图函数

void CPTNAtCommCtrl::OnDraw(
			CDC* pdc, const CRect& rcBounds, const CRect& rcInvalid)
{
	if (!pdc)
		return;

	// TODO: 用您自己的绘图代码替换下面的代码。
	pdc->FillRect(rcBounds, CBrush::FromHandle((HBRUSH)GetStockObject(WHITE_BRUSH)));
	pdc->Ellipse(rcBounds);
}



// CPTNAtCommCtrl::DoPropExchange - 持久性支持

void CPTNAtCommCtrl::DoPropExchange(CPropExchange* pPX)
{
	ExchangeVersion(pPX, MAKELONG(_wVerMinor, _wVerMajor));
	COleControl::DoPropExchange(pPX);

	// TODO: 为每个持久的自定义属性调用 PX_ 函数。
}



// CPTNAtCommCtrl::OnResetState - 将控件重置为默认状态

void CPTNAtCommCtrl::OnResetState()
{
	COleControl::OnResetState();  // 重置 DoPropExchange 中找到的默认值

	// TODO: 在此重置任意其他控件状态。
}



// CPTNAtCommCtrl::AboutBox - 向用户显示“关于”框

void CPTNAtCommCtrl::AboutBox()
{
	CDialog dlgAbout(IDD_ABOUTBOX_PTNATCOMM);
	dlgAbout.DoModal();
}



// CPTNAtCommCtrl 消息处理程序

BSTR CPTNAtCommCtrl::GetCommName(void)
{
	AFX_MANAGE_STATE(AfxGetStaticModuleState());

	CString strResult = CString(GetComm());

	// TODO: 在此添加调度处理程序代码

	return strResult.AllocSysString();
}

void CPTNAtCommCtrl::OnCommSeqChanged(void)
{
	AFX_MANAGE_STATE(AfxGetStaticModuleState());

	// TODO: 在此添加属性处理程序代码

	SetModifiedFlag();
}

BSTR CPTNAtCommCtrl::GetComm(void)
{
	AFX_MANAGE_STATE(AfxGetStaticModuleState());

	CString strResult = m_Comm;

	// TODO: 在此添加调度处理程序代码

	return strResult.AllocSysString();
}

void CPTNAtCommCtrl::SetComm(LPCTSTR newVal)
{
	AFX_MANAGE_STATE(AfxGetStaticModuleState());

	// TODO: 在此添加属性处理程序代码
	m_Comm = CString(newVal);

	SetModifiedFlag();
}