s18_01.idl

本书分为五个部分

// S18_01.idl : ActiveX 控件项目的类型库源。

// 此文件将由 MIDL 编译器工具处理以
//产生类型库 (S18_01.tlb)，该类型库将成为 
// S18_01.ocx 中的资源。

#include <olectl.h>
#include <idispids.h>

[ uuid(99DF062D-DA9B-4F35-B586-4A7FD625592C), version(1.0),
  helpfile("S18_01.hlp"),
  helpstring("S18_01 ActiveX 控件模块"),
  control ]
library S18_01Lib
{
	importlib(STDOLE_TLB);

	//  CAnEasyValueCtrl 的主调度接口

	[ uuid(B2CC7821-50B3-4095-B1ED-1136912EFB6F),
	  helpstring("AnEasyValue Control 的调度接口")]
	dispinterface _DS18_01
	{
		properties:
		[id(DISPID_CAPTION), helpstring("属性 Caption")] BSTR Caption;
		[id(DISPID_BACKCOLOR), helpstring("属性 BackColor")] OLE_COLOR BackColor;
		[id(DISPID_FORECOLOR), helpstring("属性 ForeColor")] OLE_COLOR ForeColor;
		[id(1), helpstring("属性 TextAlign")] LONG TextAlign;
		[id(2), helpstring("属性 MaxValue")] LONG MaxValue;
		[id(3), helpstring("属性 MinValue")] LONG MinValue;
		[id(4), helpstring("属性 CurValue")] LONG CurValue;
methods:

			[id(DISPID_ABOUTBOX)] void AboutBox();
			[id(DISPID_DOCLICK), helpstring("方法DoClick")] void DoClick(void);
			[id(5), helpstring("方法ABeep")] void ABeep(void);
	};

	//  CAnEasyValueCtrl 的事件调度接口

	[ uuid(2BA2463A-AD1E-4904-9046-7AF544E964AE),
	  helpstring("AnEasyValue Control 的事件接口") ]
	dispinterface _DS18_01Events
	{
		properties:
			//  事件接口没有任何属性

		methods:
		[id(DISPID_CLICK)] void Click(void);
		[id(1)] void ValueIsMax(LONG* pMaxValue);
	};

	//  CAnEasyValueCtrl 的类信息

	[ uuid(F4ACBF47-54F5-401F-A007-C59FB17B4929),
	  helpstring("AnEasyValue Control"), control ]
	coclass S18_01
	{
		[default] dispinterface _DS18_01;
		[default, source] dispinterface _DS18_01Events;
	};

};