技术文章 > 如何利用C++ Builder实现对Excel的调用?

如何利用C++ Builder实现对Excel的调用?

2018-11-17 15:31

文档管理软件,文档管理系统,知识管理系统,档案管理系统的技术资料:
如何利用C++ Builder 4.0 Enterprise实现对Excel97 的调用
(作者:孙航东 2000年08月02日 11:25)
  
  我们在进行数据库软件的开发时,一般都要进行大量的报表设计,虽然我们可以利用Crystal Report 或程序自带的报表工具进行报表设计,但是当涉及到要设计多重报表或交叉报表时、我们一般都会感到自己力不从心。有时虽然想利用Excel作为前台报表,但却找不到相关接口只能作罢。其实我们只要知道Excel的接口结构,就能够方便的实现对Excel的调用。
  原理:在Excel 中程序接口一般分为3层 ,分别为:ExelApplication、Excelbook、Excelsheet 其中ExelApplication代表Excel程序,Excelbook代表Excel程序当前的工作本,Excelsheet代表Excelbook当前激活的表格,因此在启动Excel程序时要按此序分别启动,这样就能实现对Excel报表的操作。
  现举例为例介绍如下:
  一、在Import Type Library中加入 Excel8.olb,在\include 子目录下生成Excel_TLB.h文件.
  二、在BCB4.0中Form1中添加Button1、Button2、Button3、Table1,并存盘为Project1。
  三、在Unit1.h中加入头文件 #include "..\Excel_tlb.h"
       在Private中加入
   Private:  
   TCOM_Application Application;   file://定义ExcelApplication对象//
    WorksheetPtr  Worksheet;        // 定义ExcelSheet对象//
    RangePtr   FirstCol ;           file://定义列对象//
    RangePtr   Range             file://定义表格操作范围//
  
  四、在Button1的OnClikc事件中添加如下代码:

void __fastcall TForm1::Button1Click(TObject *Sender)
{//启动Excel//
   const int xlWBatChart = -4109;
const int xlWBatWorksheet = -4167;  
if (! Application)
  Application = CoApplication_::Create(); file://建立于Excel程序的连接//
Application->set_Visible(0, true);//打开Excel程序//
Application->Workbooks->Add(xlWBATWorksheet);//创建只含有一个ExcelSheet的ExcelBook//
Worksheet = Application->Workbooks->get_Item(1)->Worksheets->get_Item(1);//取得该表对象//
Worksheet->Name = WideString("database Date");//建立该表的名称//
}
  
  五、在Button2的OnClikc事件中添加如下代码:
void __fastcall TForm1::Button2Click(TObject *Sender)
{//添加数据//
int i, j;
   Table1->DatabaseName="DBDEMOS";
   Table1->TableName="Author.db";
  Table1->Open( );
  for( i=0;iFieldCount;i++)
Worksheet->Cells->set__Default(1,i,Table1->Fileds->Fileds[i]->FiledName);//在指定的位置加入字段名//
Table1->First();
j=2;
while( !Table1->Eof( ))
{
for( i=0;iFieldCount;i++)
Worksheet->Cells->set__Default(j,i, Table1->Fields->Fileds[i]->AsString);////在指定的位置加入数据库的内容//
Table1->Next( );
j++;
}

  }

六、在Button3的OnClikc事件中添加如下代码:
void __fastcall TForm1::Button3Click(TObject *Sender)
{//表格设置//
  Range = m_Worksheet->get_Range("C1:F20");//设置表格操作范围//
  Range->Font->size=12;//设置字体大小//
  Range->Columns->Interior->ColorIndex = 3;//设置表格表格颜色//
  Range->Borders->LineStyle = xlContinuous;//设置表格边框//
  FirstCol = m_Worksheet->Columns->get__Default(3 );//取得当前表格的第三列对象//
  FirstCol->ColumnWidth = 25;       // 设置对象宽度//
  FirstCol->Font->Bold = true;        // 设置字体属性为加粗//
  FirstCol->Font->Italic = true;       file://设置字体的种类//
  FirstCol->Font->Color = clBlue;     // 设置字体的颜色//
}
   以上程序在C++ Builder 4.0 Enterprise + Pwin98中实现。
   通过以上程序可以看出,只要我们在程序中对Excel进行巧妙的设置,就能够设计出具有专业水平的报表。