这是一个可以导出TDataSet及其子类的数据到Excel或导出为html超文本文件的控件.可用于Delphi5/6或CBuilder5/6。
本控件完全免费,可以应用在任何场合,但不得对本控件进行任何修改。
特点:
1.设置DataSet后能自动配置导出列,并且能自动侦测对应字段的设置。
2.可以在设计时段就导出TDataSet的数据,这样可以方便在设计时调整导出格式,即使你的程序不需要使用本控件,也可以临时使用本控件导出你需要的数据。
3.提供了丰富的属性进行设置,而缺省设置是较佳的,所以使用也十分方便,只要设置了DataSet,然后用ExecExport或ExportToExcel或ExportToHtmlFile就可以了。
4.所有设置由控件自身保存,而不依赖TDataSet或TDBGrid。这样自制导出选项对话框等都十分方便。
Excel导出方式会打开Excel,需要机器上安装了Excel2000.本控件1.01版本比1.0版增加了对excel页面设置的控制,并可自动设置每页页头.Excel导出方式速度极慢,这是由Excel ole对象本身决定的,没有办法。
Html文件导出方式为文件流读写,速度很快,但在换行控制等方面不如Excel,你可以先高速导出为html文件,然后用Excel打开这个Html文件进行排版!方法很简单,以html文件方式进行导出,但文件扩展名改为.xls.这样导出完打开时就会用excel打开这个扩展名为xls但其实是html格式的文件。
Excel可以将文件转换为DBF等格式。
设计时段导出:先设置DataSet,然后激活DataSet,再设置Cols,然后双击TDataSetExport控件即可。
编程参考:
TDataSetExport的属性,事件,方法:
TDataSetExport = class(TComponent) public property LineNumber: Integer;
//当前正在处理的行 constructor Create(AOwner: TComponent); override; destructor Destroy; override; procedure ExportToExcel;
//导出到Excel procedure ExportToHtmlFile;
//导出为html超文本文件 procedure ExecExport;
//导出, 会弹出方式式选择对话框 published property AppTitle:AnsiString;
//窗体标题 property Title:AnsiString;
//标题栏 property FootText:AnsiString;
//页脚文本,支持[Date]和[Time]标记,分别表示当前日期和当前时间 property FileName:AnsiString;
//导出文件名,如果不为空,将自动将导出结果另存到此文件 property BorderWidth:Integer;
//框线宽度,如果为0,则无边线 property TitleFont:TFont;
//标题字体 property FootFont:TFont;
//页脚字体 property HeadFont:TFont;
//列头字体 property Options:TDataSetExportOptions;
//选项 { ETEOShowApp:导出后显示应用程序 ETEOShowWait:显示等待框 ETEOShowProgress:在等待框中显示进度,只有在包含ETEOShowWait时才有效 ETEOShowTitle:导出标题 ETEOShowFoot:导出页脚 ETEOShowHead:导出列头 ETEOAutoOverWrite:自动覆盖,如果文件已存在,则不提示而直接覆盖 ETEOShowPageNumber:在Excel中显示页码 } property BorderColor:TColor;
//框线颜色 property BorderLineStyle:TLineStyle;
上一篇:用游戏操纵杆摸拟鼠标
下一篇:C++Builder4.0实现在线接收电子邮件
|