delphi
文章平均质量分 77
vriuswgq
这个作者很懒,什么都没留下…
展开
-
字符串分割函数
unit TMyTool;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TPMMS=Class(TObject)原创 2008-06-12 08:46:00 · 359 阅读 · 0 评论 -
遗传算法的基本代码
unit GADelphi;interfaceuses Math, SysUtils;type PUnsigned = array of Cardinal; Pint = ^integer; individual = record chrom: PUnsigned; fitness:原创 2008-06-18 22:39:00 · 1152 阅读 · 1 评论 -
用FASTREPORT实现WEB应用中自定义报表
在C/S结构系统中,报表问题有很多成熟的 解决方法。如DELPHI开发工具不仅自带有报表控件,还可以利用第三方控件来实现快速灵活的报表制作和打印,其中有名的控件是FR-Software & A.Tzyganenko 的FastReport。FastReport提供了能与DELPHI无缝集成的从设计到打印的完整控件包,提供的设计界面友好灵活,对于开发可让用户自 定义报表的C/S应用来说,是一种很转载 2008-06-12 10:11:00 · 812 阅读 · 0 评论 -
Delphi 中遍历 XML 文档的完整示例
Delphi 中遍历 XML 文档的完整示例 XML 文档的节点是标准的树形结构,可以通过递归或者回溯算法来遍历所有的节点。 本例使用递归算法为例,制作了2个遍历 XML 文档的例子。 第一个例子,给出一个 XML 节点,遍历所有子节点-不包括起始节点。 第二个例子,给出一个 XML 节点,遍历所给的节点及其下属的所有子节点。转载 2008-06-12 10:00:00 · 831 阅读 · 0 评论 -
一个托盘程序
unit MainUnit;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, Menus, ShellAPI, ExtCtrls;const ICON_ID= 1; MI_I原创 2008-06-12 09:27:00 · 349 阅读 · 0 评论 -
Xml简要
一) XML优点 先让我们了解一下什么是XML(扩展标识语言). XML属于SGML(Standard Greneralized Markup Language 标准通用标记语言)的一个子集, 它是一种采用标记来描述文档(数据)的种类和方法. XML是由W3C下属的XML小组在JonBosak 的领导下于1996年完成的规范, 1998年正是成为一种W3C推荐的标准. 使用过HTML的开转载 2008-06-12 10:19:00 · 122 阅读 · 0 评论 -
计算目录大小的函数,获得目录文件列表,计算文件的大小
这个函数可以获得指定目录下所有的文件路径+名称,能够递归搜索:procedure FindAllFile(const Dir: string;List: TStringlist);var hFindFile: THandle; FindFileData: WIN32_FIND_DATA; FullName,FName,s:string;原创 2008-06-12 09:20:00 · 596 阅读 · 0 评论 -
TStringList 常用操作
//TStringList 常用方法与属性:var List: TStringList; i: Integer;begin List := TStringList.Create; List.Add(Strings1); {添加} List.Add(Strings2); List.Exchange(0,1);转载 2008-06-11 10:03:00 · 289 阅读 · 0 评论 -
调用外部 DLL 中的函数
//早绑定unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton;转载 2008-06-12 10:22:00 · 527 阅读 · 0 评论 -
自定义快速报表的打印预览窗口
自定义快速报表的打印预览窗口 Quick Report 2.0 中 提 供 的 默 认 打 印 预 览 窗 口 是 英 文 界 面 的, 如 果 开 发 的 中 文 软 件 中 带 有 这 种 英 文 显 示, 不 免 有 些 小 小 的 缺 憾。 因 此 有 必 要 实 现 中 文 界 面 的 打 印 预 览 窗 口。 但 是Delphi 提 供 的 源 代 码 中转载 2008-06-12 10:15:00 · 463 阅读 · 0 评论 -
文本文件以指定的字符串分割
文本文件的分割。 这段代码是按照指定的分割符将文本文件分割成若干个片段。 代码如下:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;原创 2008-06-12 08:59:00 · 903 阅读 · 0 评论 -
delphi导出Excel
delphi导出EXCEL网上的代码,不是需要ADOQUERY,就是TABLE,再不就是与DBGRID绑定.每一次使用总是特别麻烦.前几天想自己不如将EXCEL的导出函数给改一下.于是自己加了一些东西.这样子好了.以后调用方便至极.呵呵. 调用方法:saveAsExcel(select users as [用户名],pwd as [用户密码] from login,c:/aaaa.x转载 2009-02-03 15:16:00 · 735 阅读 · 0 评论