funmap.idl

这是非常有挑战性的题目。对于用户输入的任意一个平面函数f(x)

// FunMap.idl : IDL source for FunMap.dll
//

// This file will be processed by the MIDL tool to
// produce the type library (FunMap.tlb) and marshalling code.

import "oaidl.idl";
import "ocidl.idl";
#include "olectl.h"
	

	[
		object,
		uuid(CA892498-1322-4BE8-BC00-301889DC14B4),
		dual,
		helpstring("IMap Interface"),
		pointer_default(unique)
	]
	interface IMap : IDispatch
	{
		[propput, id(DISPID_BACKCOLOR)]
		HRESULT BackColor([in]OLE_COLOR clr);
		[propget, id(DISPID_BACKCOLOR)]
		HRESULT BackColor([out,retval]OLE_COLOR* pclr);
		[propput, id(DISPID_BORDERCOLOR)]
		HRESULT BorderColor([in]OLE_COLOR clr);
		[propget, id(DISPID_BORDERCOLOR)]
		HRESULT BorderColor([out, retval]OLE_COLOR* pclr);
		[propput, id(DISPID_FORECOLOR)]
		HRESULT ForeColor([in]OLE_COLOR clr);
		[propget, id(DISPID_FORECOLOR)]
		HRESULT ForeColor([out,retval]OLE_COLOR* pclr);
		[propget, id(1), helpstring("property Expression")] HRESULT Expression([out, retval] BSTR *pVal);
		[propput, id(1), helpstring("property Expression")] HRESULT Expression([in] BSTR newVal);
		[propget, id(2), helpstring("property MaxX")] HRESULT MaxX([out, retval] double *pVal);
		[propput, id(2), helpstring("property MaxX")] HRESULT MaxX([in] double newVal);
		[propget, id(3), helpstring("property MaxY")] HRESULT MaxY([out, retval] double *pVal);
		[propput, id(3), helpstring("property MaxY")] HRESULT MaxY([in] double newVal);
		[id(4), helpstring("method Result")] HRESULT Result([in] long i, [in] double x, [in] double y);
		[propget, id(5), helpstring("property Pi")] HRESULT Pi([out, retval] double *pVal);
		[id(6), helpstring("method Log10")] HRESULT Log10([in] double dbVal, [out,retval] double * pdbVal);
	};

[
	uuid(F61E73AC-03E3-4E4C-B735-54128C275DE4),
	version(1.0),
	helpstring("FunMap 1.0 Type Library")
]
library FUNMAPLib
{
	importlib("stdole32.tlb");
	importlib("stdole2.tlb");

	[
		uuid(65F1C634-B763-4F2A-95BA-AF88D1464CCA),
		helpstring("_IMapEvents Interface")
	]
	dispinterface _IMapEvents
	{
		properties:
		methods:
		[id(1), helpstring("method ScriptErr")] HRESULT ScriptErr([in] BSTR bstrError);
	};
	[
		uuid(4450D39A-214B-4AA4-95EB-25E14AA16A15),
		helpstring("Map Class")
	]
	coclass Map
	{
		[default] interface IMap;
		[default, source] dispinterface _IMapEvents;
	};

	[
		uuid(93166237-A00E-40A5-BAB3-C31B79B7DA27),
		helpstring("MapPP Class")
	]
	coclass MapPP
	{
		interface IUnknown;
	};
};