引言： 作为一个开发各种信息系统的程序员，写报表是家常便饭的事，以至于曾经写个一个为报表而报表的项目^_^我用过报表的控件不多，用过Quick Report，Rave Report还有以前用VB时用过十分低版本的Crystal Report，当然还有这篇文章的主角Excel。
摘要：在delphi中使用xml文档有两种方法 使用xml broker, 是delphi 内置的。例: unit showxml; interface uses classes httpapp db dbclient midas xmlbrokr webcomp miditems; type tcustomshowxmlbutton = class(txmlbutton iscriptcomponen......
摘要：使用midas访问远程access数据库allen tao(http://blog.csdn.net/allentao/)2005-5-3本文源码下载访问远程数据库常用的办法是使用大型数据库自带的客户端工具，如sql server和oracle等都带有这样的工具。带对于access这样的小型数据库，这种方法就无法使用了，因为access不提供这样的客户端工具。但我们可以通过midas实现访问远程a......
在Delphi中创建的简单的Excel报表类
作为一个开发各种信息系统的程序员,写报表是家常便饭的事,以至于曾经写个一个为报表而报表的项目^_^ 【程序编程相关:
偶的第二个Delphi程序
】 【推荐阅读:
Delphi7对XML的支持分析
】我用过报表的控件不多,用过quick report,rave report还有以前用vb时用过十分低版本的crystal report,当然还有这篇文章的主角excel.excel做报表有什么好处与坏处.我就不说了,大家都明白.（写了浪费大家时间） 【扩展信息:
第一次接触Delphi
】 在delphi中有专门的控件去调用word.excel等的office组件.但这些控件的功能太多了,之间又有不少的联系,如果只是为调用excel生成报表的话,我觉得还不如我自己这个类方便. 我先来介绍一下我这个类的用法,各位看官,主看以下代码:
procedure tform1.formcreate(sender: tobject);
begin afer := tflexexcelreport.create; afer.modelfile := extractfilepath(application.exename) + book1.xls; end;
procedure tform1.formdestroy(sender: tobject);
begin afer.free; end;
procedure tform1.button2click(sender: tobject);
var p1, p2 : tpoint; begin p1.x := 2; p1.y := 3; p2.x := 10; p2.y := 20; afer.connect; afer.cells[1, 2] := flexexcelreport test; afer.selectcell(1, 2); afer.copy; afer.selectrange(p1, p2); afer.paste; afer.selectcell(1, 2); afer.clear; afer.setprintarea(p1, p2); end; 程序运行后,点击button2,就会马上创建一个excel的实例,这个实例是以book1.xls为模板来打开的,打开后excel会自动把这个文档命名为book11.然后在1,2这个格里面填入内容,选择这个格子,复制,跟着选择2,3 －10,20这个区域,把刚才复制在剪贴板的内容复制进去.接下来就清除掉1,2中的内容,最后设置打印区域. 每次点击button2都会重复上面的操作.反正用户点击多少次button2,就会生成多少个excel的实例.你不必担心,当你退出这个程序时,这些excel都会随之关闭并释放对像....
下一页 摘要：模仿c能判断#include<>;main();int;char;for;printf;scanf;{}; private //在str中找第一个单词 如果 找到则返回第一个单词的地址（phrase）和下一个要分析单词的入口（nextptr） //如果str是空串则返回false function phrase(str:string;phrase,nextptr:pchar):bool......
