利用Delphi 5.0开发OLE自动化控制器操纵Excel

• ---- OLE自动化是Windows应用程序之间互相操纵的一种技巧。被操纵的一方称为自动化服务器（也称自动化对象），典型的自动化服务器有Microsoft Word、Excel和Powerpoint。操纵自动化服务器的一方称为自动化控制器。在开发数据库应有程序中，经常需要借助Microsoft Excel的强大报表功能，把数据库中的数据输出到Excel表格中。Delphi 5.0以前的版本虽然也可以编写自动化控制器和自动化服务器，但编写程序较为复杂，不易掌握。Delphi 5.0对于OLE提供了强大的支持，利用Delphi 5.0最新提供的Servers栏控件可以很容易开发OLE自动化控制器实现对OLE自动化服务器的调用，发挥Word、Excel、Powerpoint的强大功能。
  
  ---- 下面给出一利用Delphi 5.0开发OLE自动化控制器操纵Excel的实例，希望对用Delphi开发OLE应用程序的编程人员有所帮助。
  
  ---- 首先新建一Application， 然后在Form1上放置Servers栏控件ExcelApplication1、 ExcelWorkbook1、 ExcelWorksheet1， 再放置控件Table1、 Datasource1、 Dbgrid1、 Button1、 Button2、 Button3、 Button4， 并设置Table1.databasename:=dbdemos， Table1.TableName:=Country.db， Table1.active:=True, Button1.Caption:='SaveToExcel', Button2.caption:='PrintPreview', Button3.caption:='Print', Button4.caption:='CloseExcel'。代码如下：
  
  unit Unit1;
  
  interface
  
  uses
  Windows, Messages, SysUtils, Classes,
  Graphics, Controls,
  Forms, Dialogs, Excel97, OleServer, Db, DBTables,
  Grids, DBGrids, StdCtrls;
  
  type
  TForm1 = class(TForm)
  ExcelApplication1: TExcelApplication;
  ExcelWorkbook1: TExcelWorkbook;
  ExcelWorksheet1: TExcelWorksheet;
  Table1: TTable;
  Table1Name: TStringField;
  Table1Capital: TStringField;
  Table1Continent: TStringField;
  Table1Area: TFloatField;
  Table1Population: TFloatField;
  button1: TButton;
  DataSource1: TDataSource;
  DBGrid1: TDBGrid;
  Button2: TButton;
  Button3: TButton;
  Button4: TButton;
  procedure button1Click(Sender: TObject);
  procedure Button2Click(Sender: TObject);
  procedure Button3Click(Sender: TObject);
  procedure Button4Click(Sender: TObject);
  private
  { Private declarations }
  public
  { Public declarations }
  end;
  
  var
  Form1: TForm1;
  
  implementation
  
  {$R *.DFM}
  
  

• [1] [2] [3] [4] [5] 下一页 
• 复制本页网址和标题，发送给你QQ/Msn的好友一起分享
  
  
• 利用Delphi 5.0开发OLE自动化控制器操纵Excel 相关文章：
• ·利用插件来校验XHTML是否符合Web标准
• ·Web2.0在中国步入歧途 缺赢利模式VC有错
• ·利用UNIX的TFTP和RCP配置路由器
• ·黑客如何利用文件包含漏洞进行网站入侵
• ·利用iTextSharp生成Pdf一个小例子
• ·ASP.Net利用CSS实现多界面的方法
• ·利用XMLHTTP无刷新添加数据
• ·异域风情 奥地利美丽风景集
• ·网站优化:怎么利用Tags进行SEO
• ·利用expression实现界面对象的批量控制
• 利用Delphi 5.0开发OLE自动化控制器操纵Excel 相关软件
• ·魂之利刃4公布宣传片
• ·NDS《胜利11人DS 中文汉化版》模拟器
• ·《超级马利奥64 DS》模拟器下载
• ·《毛利元就三箭之誓》试玩
• ·NDS《哈利波特和凤凰令》模拟器
• ·亚历山大·别利亚耶夫作品集V1.0
• ·《哈利波特与凤凰社》PC版试玩
• ·秘书长——一场正义与腐败的权利博弈
• ·法拉利赛车2 汉化版
• ·《命令与征服3泰伯利亚战争》全版本修改器全集

上一篇:利用Delphi的TJPEGImage控件把BMP转化成JPEG

下一篇:扩展Delphi的线程同步对象

• 特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
• 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
• 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

精品推荐

热点TOP10

特别推荐