-
Delphi 7 中使用RAVE报表(一)
Delphi 7 中使用 RAVE 报表(一) 最近刚刚做完一个项目,使用到了RAVE进行报表设计,在使用中也查阅了很多资料,但总觉得网上的资料过于分散,而且都不是很全面,所以决定将如何在 Delphi 7中使用RAVE报表写成几篇文章,由于本人从小语文学得不好,不是写作高手,...
2008-04-09 04:22:36
-
Delphi2005学习笔记1
终于由Delphi2005试用了,前两天体验了一下IDE的一些新功能,还算不错,就是速度稍微有一点慢,关键是我的实验室的机器也不好,只有256M,宿舍的要好一些512M,用起来就流畅多了,不过启动速度还是不如VS2005快。说到稳定性,比D8强多了,但是还是听到有人说bug比较多...
2008-04-09 04:22:35
-
多层数据库开发四:BDE会话期
不管是单层、两层还是多层的数据库应用程序,一般都要用到BDE(BorlandDatabase Engine)。Delphi 4用TSession来管理BDE会话期对象,用TSessionList来管理和操纵一个应用程序中所有的BDE会话期对象。 一般来说,并不需要显式地把TSession构件放到窗体或数据模块上,因为...
2008-04-09 04:22:33
-
DBGrid 应用全书(一)
在 Delphi 语言的数据库编程中, DBGrid 是显示数据的主要手段之一。但是 DBGrid 缺省的外观未免显得单调和缺乏创意。其实,我们完全可以在我们的程序中通过编程来达到美化 DBGrid 外观的目的。通过编程,我们可以改变 DBGrid 的表头、网格、网格线的前景色和背景色,...
2008-04-09 04:22:32
-
Window画图程序中画曲线的简单实现
下面是很入以前的一个程序,模仿Windows的画图程序中画曲线.其实原理简单得要命 ,就是一个PolyBezier函数. 那一位有兴趣的可以封装成一个类,方便以后用. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialo...
2008-04-09 04:22:31
-
巧用DBGrid控件的Sort属性实现“点击标题栏自动排序功
很多朋友在使用DBGrid控件时,抱怨没有点击标题栏便可自动排序的功能,实际上通过ADOQuery或其它数据集组件的Sort属性配合DBGrid的OnTitleClick事件,可以方便地实现此功能。因为Sort属性可以让活动数据集按指定的字段进行排序,也可以选择排序方式(升序/降序),所以...
2008-04-09 04:22:31
-
LineDDA的一个例子
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, Buttons; type TfmMain = class(TForm) procedure FormPaint(Sender: TObject); end; var fmMain: TfmMain; A: Byte; implemen...
2008-04-09 04:22:30
-
delphi实现批量缩略图生成工具开发代码
主要功能: 1 生成指定图片的缩略图 2 批量生成某一目录内所有图片缩略图 3 提供5中缩略图尺寸定义模式 4 目前只支持.jpg格式 测试版下载:http://bjfile.focus.cn/file/15483/728_MJpg.rar 核心代码: //保存JPEG的缩略图 procedure SavePic(SourceFileName,DescFileN...
2008-04-09 04:22:31
-
Delphi中使用纯正的面向对象方法
Delphi 的VCL技术使很多程序员能够非常快速的入门:程序员门只要简单的拖动再加上少量的几个Pascal语句,呵呵,一个可以运行得非常良好的Delphi程序!恭喜你,你已经可以进行程序开发这个伟大的事业了。不过,当你学了一段时间后也许就不这么想了哦。因为Delphi是支持...
2008-04-09 04:22:29
-
使TStringGrid自适应宽度
procedure AutoFitable(AGrids: TStringGrid); //传入TStringGrid对像即可, 2004/10/28,CoolSlob var I, J: Integer; MaxLenRow: Integer; CurRowLen: Integer; begin inherited; for J := 0 to AGrids.ColCount - 1 do begin MaxLenRow := 0; for I := 1 to AGrids.Ro...
2008-04-09 04:22:28
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash