相关分类: Java技术 C/C++ VB delphi
  • 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

2