spreadsheet.cpp

这是本人两年前兼职为某个公司做的石油钻进设计软件

void CSpreadSheet::SetClipboardOptions(short propVal)
{
	SetProperty(0x119, VT_I2, propVal);
}

BOOL CSpreadSheet::GetPrintSmartPrint()
{
	BOOL result;
	GetProperty(0x11a, VT_BOOL, (void*)&result);
	return result;
}

void CSpreadSheet::SetPrintSmartPrint(BOOL propVal)
{
	SetProperty(0x11a, VT_BOOL, propVal);
}

long CSpreadSheet::GetPrintPageOrder()
{
	long result;
	GetProperty(0x11b, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetPrintPageOrder(long propVal)
{
	SetProperty(0x11b, VT_I4, propVal);
}

long CSpreadSheet::GetPrintPageCount()
{
	long result;
	GetProperty(0x11c, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetPrintPageCount(long propVal)
{
	SetProperty(0x11c, VT_I4, propVal);
}

long CSpreadSheet::GetPrintFirstPageNumber()
{
	long result;
	GetProperty(0x11d, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetPrintFirstPageNumber(long propVal)
{
	SetProperty(0x11d, VT_I4, propVal);
}

long CSpreadSheet::GetPrintNextPageBreakCol()
{
	long result;
	GetProperty(0x11e, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetPrintNextPageBreakCol(long propVal)
{
	SetProperty(0x11e, VT_I4, propVal);
}

long CSpreadSheet::GetPrintNextPageBreakRow()
{
	long result;
	GetProperty(0x11f, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetPrintNextPageBreakRow(long propVal)
{
	SetProperty(0x11f, VT_I4, propVal);
}

long CSpreadSheet::GetTypeComboBoxhWnd()
{
	long result;
	GetProperty(0x120, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetTypeComboBoxhWnd(long propVal)
{
	SetProperty(0x120, VT_I4, propVal);
}

unsigned long CSpreadSheet::GetSelBackColor()
{
	unsigned long result;
	GetProperty(0x121, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetSelBackColor(unsigned long propVal)
{
	SetProperty(0x121, VT_I4, propVal);
}

unsigned long CSpreadSheet::GetSelForeColor()
{
	unsigned long result;
	GetProperty(0x122, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetSelForeColor(unsigned long propVal)
{
	SetProperty(0x122, VT_I4, propVal);
}

short CSpreadSheet::GetTwoDigitYearMax()
{
	short result;
	GetProperty(0x123, VT_I2, (void*)&result);
	return result;
}

void CSpreadSheet::SetTwoDigitYearMax(short propVal)
{
	SetProperty(0x123, VT_I2, propVal);
}

long CSpreadSheet::GetOLEDropMode()
{
	long result;
	GetProperty(0x13b, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetOLEDropMode(long propVal)
{
	SetProperty(0x13b, VT_I4, propVal);
}

OLE_COLOR CSpreadSheet::GetBackColor()
{
	OLE_COLOR result;
	GetProperty(DISPID_BACKCOLOR, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetBackColor(OLE_COLOR propVal)
{
	SetProperty(DISPID_BACKCOLOR, VT_I4, propVal);
}

short CSpreadSheet::GetBorderStyle()
{
	short result;
	GetProperty(DISPID_BORDERSTYLE, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetBorderStyle(short propVal)
{
	SetProperty(DISPID_BORDERSTYLE, VT_I4, propVal);
}

BOOL CSpreadSheet::GetEnabled()
{
	BOOL result;
	GetProperty(DISPID_ENABLED, VT_BOOL, (void*)&result);
	return result;
}

void CSpreadSheet::SetEnabled(BOOL propVal)
{
	SetProperty(DISPID_ENABLED, VT_BOOL, propVal);
}

COleFont CSpreadSheet::GetFont()
{
	LPDISPATCH pDispatch;
	GetProperty(DISPID_FONT, VT_DISPATCH, (void*)&pDispatch);
	return COleFont(pDispatch);
}

void CSpreadSheet::SetFont(LPDISPATCH propVal)
{
	SetProperty(DISPID_FONT, VT_DISPATCH, propVal);
}

OLE_COLOR CSpreadSheet::GetForeColor()
{
	OLE_COLOR result;
	GetProperty(DISPID_FORECOLOR, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetForeColor(OLE_COLOR propVal)
{
	SetProperty(DISPID_FORECOLOR, VT_I4, propVal);
}

OLE_HANDLE CSpreadSheet::GetHWnd()
{
	OLE_HANDLE result;
	GetProperty(DISPID_HWND, VT_I4, (void*)&result);
	return result;
}

void CSpreadSheet::SetHWnd(OLE_HANDLE propVal)
{
	SetProperty(DISPID_HWND, VT_I4, propVal);
}

CString CSpreadSheet::GetText()
{
	CString result;
	GetProperty(DISPID_TEXT, VT_BSTR, (void*)&result);
	return result;
}

void CSpreadSheet::SetText(LPCTSTR propVal)
{
	SetProperty(DISPID_TEXT, VT_BSTR, propVal);
}

/////////////////////////////////////////////////////////////////////////////
// CSpreadSheet operations

double CSpreadSheet::GetColWidth(long lCol)
{
	double result;
	static BYTE parms[] =
		VTS_I4;
	InvokeHelper(0xd9, DISPATCH_PROPERTYGET, VT_R8, (void*)&result, parms,
		lCol);
	return result;
}

void CSpreadSheet::SetColWidth(long lCol, double newValue)
{
	static BYTE parms[] =
		VTS_I4 VTS_R8;
	InvokeHelper(0xd9, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parms,
		 lCol, newValue);
}

double CSpreadSheet::GetMaxTextColWidth(long lCol)
{
	double result;
	static BYTE parms[] =
		VTS_I4;
	InvokeHelper(0xda, DISPATCH_PROPERTYGET, VT_R8, (void*)&result, parms,
		lCol);
	return result;
}

void CSpreadSheet::SetMaxTextColWidth(long lCol, double newValue)
{
	static BYTE parms[] =
		VTS_I4 VTS_R8;
	InvokeHelper(0xda, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parms,
		 lCol, newValue);
}

double CSpreadSheet::GetMaxTextRowHeight(long lRow)
{
	double result;
	static BYTE parms[] =
		VTS_I4;
	InvokeHelper(0xdb, DISPATCH_PROPERTYGET, VT_R8, (void*)&result, parms,
		lRow);
	return result;
}

void CSpreadSheet::SetMaxTextRowHeight(long lRow, double newValue)
{
	static BYTE parms[] =
		VTS_I4 VTS_R8;
	InvokeHelper(0xdb, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parms,
		 lRow, newValue);
}

double CSpreadSheet::GetRowHeight(long lRow)
{
	double result;
	static BYTE parms[] =
		VTS_I4;
	InvokeHelper(0xdc, DISPATCH_PROPERTYGET, VT_R8, (void*)&result, parms,
		lRow);
	return result;
}

void CSpreadSheet::SetRowHeight(long lRow, double newValue)
{
	static BYTE parms[] =
		VTS_I4 VTS_R8;
	InvokeHelper(0xdc, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parms,
		 lRow, newValue);
}

long CSpreadSheet::GetSortKey(short nIndex)
{
	long result;
	static BYTE parms[] =
		VTS_I2;
	InvokeHelper(0xdd, DISPATCH_PROPERTYGET, VT_I4, (void*)&result, parms,
		nIndex);
	return result;
}

void CSpreadSheet::SetSortKey(short nIndex, long nNewValue)
{
	static BYTE parms[] =
		VTS_I2 VTS_I4;
	InvokeHelper(0xdd, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parms,
		 nIndex, nNewValue);
}

long CSpreadSheet::GetSortKeyOrder(short nIndex)
{
	long result;
	static BYTE parms[] =
		VTS_I2;
	InvokeHelper(0xde, DISPATCH_PROPERTYGET, VT_I4, (void*)&result, parms,
		nIndex);
	return result;
}

void CSpreadSheet::SetSortKeyOrder(short nIndex, long nNewValue)
{
	static BYTE parms[] =
		VTS_I2 VTS_I4;
	InvokeHelper(0xde, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parms,
		 nIndex, nNewValue);
}

CPicture CSpreadSheet::GetTypeCheckPicture(short Index)
{
	LPDISPATCH pDispatch;
	static BYTE parms[] =
		VTS_I2;
	InvokeHelper(0xdf, DISPATCH_PROPERTYGET, VT_DISPATCH, (void*)&pDispatch, parms,
		Index);
	return CPicture(pDispatch);
}

void CSpreadSheet::SetTypeCheckPicture(short Index, LPDISPATCH newValue)
{
	static BYTE parms[] =
		VTS_I2 VTS_DISPATCH;
	InvokeHelper(0xdf, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parms,
		 Index, newValue);
}

BOOL CSpreadSheet::AddCustomFunction(LPCTSTR FunctionName, short ParameterCnt)
{
	BOOL result;
	static BYTE parms[] =
		VTS_BSTR VTS_I2;
	InvokeHelper(0xe0, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		FunctionName, ParameterCnt);
	return result;
}

BOOL CSpreadSheet::AddCustomFunctionExt(LPCTSTR FunctionName, short MinParamCnt, short MaxParamCnt, long Flags)
{
	BOOL result;
	static BYTE parms[] =
		VTS_BSTR VTS_I2 VTS_I2 VTS_I4;
	InvokeHelper(0xe1, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		FunctionName, MinParamCnt, MaxParamCnt, Flags);
	return result;
}

void CSpreadSheet::CFGetCellParam(short Param, long* Col, long* Row)
{
	static BYTE parms[] =
		VTS_I2 VTS_PI4 VTS_PI4;
	InvokeHelper(0xe2, DISPATCH_METHOD, VT_EMPTY, NULL, parms,
		 Param, Col, Row);
}

double CSpreadSheet::CFGetDoubleParam(short Param)
{
	double result;
	static BYTE parms[] =
		VTS_I2;
	InvokeHelper(0xe3, DISPATCH_METHOD, VT_R8, (void*)&result, parms,
		Param);
	return result;
}

double CSpreadSheet::CFGetDoubleParamExt(short Param, double* ParamValue)
{
	double result;
	static BYTE parms[] =
		VTS_I2 VTS_PR8;
	InvokeHelper(0xe4, DISPATCH_METHOD, VT_R8, (void*)&result, parms,
		Param, ParamValue);
	return result;
}

long CSpreadSheet::CFGetLongParam(short Param)
{
	long result;
	static BYTE parms[] =
		VTS_I2;
	InvokeHelper(0xe5, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		Param);
	return result;
}

BOOL CSpreadSheet::CFGetParamInfo(short Param, short* Type, short* Status)
{
	BOOL result;
	static BYTE parms[] =
		VTS_I2 VTS_PI2 VTS_PI2;
	InvokeHelper(0xe6, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		Param, Type, Status);
	return result;
}

void CSpreadSheet::CFGetRangeParam(short Param, long* Col, long* Row, long* Col2, long* Row2)
{
	static BYTE parms[] =
		VTS_I2 VTS_PI4 VTS_PI4 VTS_PI4 VTS_PI4;
	InvokeHelper(0xe7, DISPATCH_METHOD, VT_EMPTY, NULL, parms,
		 Param, Col, Row, Col2, Row2);
}

CString CSpreadSheet::CFGetStringParam(short Param)
{
	CString result;
	static BYTE parms[] =
		VTS_I2;
	InvokeHelper(0xe8, DISPATCH_METHOD, VT_BSTR, (void*)&result, parms,
		Param);
	return result;
}

void CSpreadSheet::CFSetResult(const VARIANT& Var)
{
	static BYTE parms[] =
		VTS_VARIANT;
	InvokeHelper(0xe9, DISPATCH_METHOD, VT_EMPTY, NULL, parms,
		 &Var);
}

CString CSpreadSheet::ColNumberToLetter(long HeaderNumber)
{
	CString result;
	static BYTE parms[] =
		VTS_I4;
	InvokeHelper(0xea, DISPATCH_METHOD, VT_BSTR, (void*)&result, parms,
		HeaderNumber);
	return result;
}

void CSpreadSheet::ColWidthToTwips(float Width, long* Twips)
{
	static BYTE parms[] =
		VTS_R4 VTS_PI4;
	InvokeHelper(0xeb, DISPATCH_METHOD, VT_EMPTY, NULL, parms,
		 Width, Twips);
}

void CSpreadSheet::GetBottomRightCell(long* Col, long* Row)
{
	static BYTE parms[] =
		VTS_PI4 VTS_PI4;
	InvokeHelper(0xec, DISPATCH_METHOD, VT_EMPTY, NULL, parms,
		 Col, Row);
}

BOOL CSpreadSheet::GetCellDirtyFlag(long Col, long Row)
{
	BOOL result;
	static BYTE parms[] =
		VTS_I4 VTS_I4;
	InvokeHelper(0xed, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		Col, Row);
	return result;
}

void CSpreadSheet::GetCellFromScreenCoord(long* Col, long* Row, long x, long y)
{
	static BYTE parms[] =
		VTS_PI4 VTS_PI4 VTS_I4 VTS_I4;
	InvokeHelper(0xee, DISPATCH_METHOD, VT_EMPTY, NULL, parms,
		 Col, Row, x, y);
}

BOOL CSpreadSheet::GetCellPos(long Col, long Row, long* x, long* y, long* Width, long* Height)
{
	BOOL result;
	static BYTE parms[] =
		VTS_I4 VTS_I4 VTS_PI4 VTS_PI4 VTS_PI4 VTS_PI4;
	InvokeHelper(0xef, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		Col, Row, x, y, Width, Height);
	return result;
}

void CSpreadSheet::GetClientArea(long* Width, long* Height)
{
	static BYTE parms[] =
		VTS_PI4 VTS_PI4;
	InvokeHelper(0xf0, DISPATCH_METHOD, VT_EMPTY, NULL, parms,
		 Width, Height);
}

long CSpreadSheet::GetColItemData(long Col)
{
	long result;
	static BYTE parms[] =
		VTS_I4;
	InvokeHelper(0xf1, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		Col);
	return result;
}

CString CSpreadSheet::QueryCustomName(LPCTSTR Name)
{
	CString result;
	static BYTE parms[] =
		VTS_BSTR;
	InvokeHelper(0xf2, DISPATCH_METHOD, VT_BSTR, (void*)&result, parms,
		Name);
	return result;
}

CString CSpreadSheet::GetCustomName(LPCTSTR Name)
{
	CString result;
	static BYTE parms[] =
		VTS_BSTR;
	InvokeHelper(0xf3, DISPATCH_METHOD, VT_BSTR, (void*)&result, parms,
		Name);
	return result;
}

BOOL CSpreadSheet::GetDataFillData(VARIANT* Var, short VarType)
{
	BOOL result;
	static BYTE parms[] =
		VTS_PVARIANT VTS_I2;
	InvokeHelper(0xf4, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		Var, VarType);
	return result;
}

void CSpreadSheet::GetFirstValidCell(long* Col, long* Row)
{
	static BYTE parms[] =
		VTS_PI4 VTS_PI4;
	InvokeHelper(0xf5, DISPATCH_METHOD, VT_EMPTY, NULL, parms,
		 Col, Row);
}

long CSpreadSheet::GetItemData()
{
	long result;
	InvokeHelper(0xf6, DISPATCH_METHOD, VT_I4, (void*)&result, NULL);
	return result;
}

BOOL CSpreadSheet::GetIteration(short* MaxIterations, double* MaxChange)
{
	BOOL result;
	static BYTE parms[] =
		VTS_PI2 VTS_PR8;
	InvokeHelper(0xf7, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		MaxIterations, MaxChange);
	return result;
}

void CSpreadSheet::GetLastValidCell(long* Col, long* Row)
{
	static BYTE parms[] =
		VTS_PI4 VTS_PI4;
	InvokeHelper(0xf8, DISPATCH_METHOD, VT_EMPTY, NULL, parms,
		 Col, Row);
}

long CSpreadSheet::GetMultiSelItem(long SelPrev)
{
	long result;
	static BYTE parms[] =
		VTS_I4;
	InvokeHelper(0xf9, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		SelPrev);
	return result;
}

short CSpreadSheet::GetRefStyle()
{
	short result;
	InvokeHelper(0xfa, DISPATCH_METHOD, VT_I2, (void*)&result, NULL);
	return result;
}

long CSpreadSheet::GetRowItemData(long Row)
{
	long result;
	static BYTE parms[] =
		VTS_I4;
	InvokeHelper(0xfb, DISPATCH_METHOD, VT_I4, (void*)&result, parms,
		Row);
	return result;
}

BOOL CSpreadSheet::GetText(long Col, long Row, VARIANT* Var)
{
	BOOL result;
	static BYTE parms[] =
		VTS_I4 VTS_I4 VTS_PVARIANT;
	InvokeHelper(0xfc, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		Col, Row, Var);
	return result;
}

BOOL CSpreadSheet::IsCellSelected(long Col, long Row)
{
	BOOL result;
	static BYTE parms[] =
		VTS_I4 VTS_I4;
	InvokeHelper(0xfd, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		Col, Row);
	return result;
}

BOOL CSpreadSheet::IsFormulaValid(LPCTSTR Formula)
{
	BOOL result;
	static BYTE parms[] =
		VTS_BSTR;
	InvokeHelper(0xfe, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		Formula);
	return result;
}

BOOL CSpreadSheet::IsVisible(long Col, long Row, BOOL Partial)
{
	BOOL result;
	static BYTE parms[] =
		VTS_I4 VTS_I4 VTS_BOOL;
	InvokeHelper(0xff, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		Col, Row, Partial);
	return result;
}

BOOL CSpreadSheet::LoadFromFile(LPCTSTR FileName)
{
	BOOL result;
	static BYTE parms[] =
		VTS_BSTR;
	InvokeHelper(0x100, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		FileName);
	return result;
}

BOOL CSpreadSheet::LoadTabFile(LPCTSTR FileName)
{
	BOOL result;
	static BYTE parms[] =
		VTS_BSTR;
	InvokeHelper(0x101, DISPATCH_METHOD, VT_BOOL, (void*)&result, parms,
		FileName);
	return result;
}

void CSpreadSheet::RowHeightToTwips(long Row, float Height, long* Twips)
{
	static BYTE parm