tsavetoexcel.h.txt

这是一个C++Builder类

/*********************************************
文件名:     TSaveToExcel.h
编写者:
编写日期:   2007-07-
简要描述:
版本        : V1.0.0
编译环境    :    Borland C++ Build
实现环境    :    windows 2000 sp4
--------------------------------------------------------------------------------
备注         : <其它说明>
--------------------------------------------------------------------------------
修改记录 :
日 期        版本       修改人              修改内容
2007-07-    V1.0.0
********************************************/
//---------------------------------------------------------------------------

#ifndef TSaveToExcelH
#define TSaveToExcelH

#include <Classes.hpp>
//#include <excel_2k.h>
#include "utilcls.h"
#include "comobj.hpp"

#define PG OlePropertyGet  // 取对象属性
#define PS OlePropertySet  // 设置对象属性
#define FN OleFunction     // 运行对象的函数
#define PR OleProcedure    // 运行对象的过程

//---------------------------------------------------------------------------
class TSaveToExcel
{
    private:
		Variant ExcelApp;   //应用对象
        Variant WorkBooks;  //工作簿对象
        Variant Sheets;     //工作表对象
        Variant Sheet;      //工作簿对象
        Variant WorkBook;   //工作表对象
        Variant Cell;       //工作单元格对象

		bool Connected;     //Excel连接标志
        bool Opened;        //Excel打开标志

	public:
        //构造函数
		TSaveToExcel();
        //析构函数
        ~TSaveToExcel();
        //打开文件
        bool OpenFile(WideString FILE_NAME);
        //写入单元格内容
        bool WriteCell(WideString SHEET_NAME,int CELL_X,int CELL_Y,AnsiString EVALUE);
        //读取单元格内容
        bool ReadCellValue(WideString SHEET_NAME,int CELL_X,int CELL_Y,AnsiString &EVALUE);
        //读取单元格公式
		bool ReadCellFormula(WideString SHEET_NAME,int CELL_X,int CELL_Y,AnsiString &EVALUE);
        //重命名工作表
		bool RenameSheet(WideString OLD_SHEET_NAME,WideString NEW_SHEET_NAME);
        //保存
		bool Save();
        //存入文件
		bool SaveToFile(WideString FILE_NAME);
        //退出
		bool Quit();
        //设定可见性
		bool SetVisible(bool VISIBLE);
        //添加工作表
		bool AddSheet(WideString SHEET_NAME);
        //删除工作表
        bool DeleteSheet(WideString SHEET_NAME);
        //新建文件
        bool NewFile(WideString FILE_NAME);
        //打开Execl
		bool ConnectExcel();
        //取X序号
		bool GetXCount(WideString SHEET_NAME,AnsiString &X);
        //取Y序号
		bool GetYCount(WideString SHEET_NAME,AnsiString &Y);
        //取工作表序号
		int  GetSheetCount();
        //取工作表名称
		bool GetSheetName(int item,AnsiString &EVALUE);
};
//---------------------------------------------------------------------------
#endif