Delphi自定义部件开发(六)

2008-02-23 07:16:34来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

19.3 Delphi部件编程实例

 

19.3.1 创建数据库相关的日历控制-TDBCalendar

 

  当处理数据库联接时,将控制和数据直接相联是很重要的。就是说,应用程序可以建立控制与数据库之间的链。Delphi包括了数据相关的标签、编辑框、列表框和栅格。用户可以使自己的控制与数据相关。

  数据相关有若干等级。最简单的是只读数据相关或数据浏览,以及反映数据库当前状态的能力。比较复杂的是数据相关的编辑,也即用户可以在控制上操作数据库中的数据。

  在本部分中将示例最简单的情况,即创建联接数据库的单个字段的只读控制。本例中将使用Component PaletteSamples页中的TCalendar部件。

创建数据相关的日历控制包括下列几步:

创建和注册部件

使控制只读

增加数据联接(Data Link)

响应数据改变

 

19.3.1. 1创建和注册部件

 

每个部件的创建都从相同的方式开始,在本例中将遵循下列过程:

将部件库单元命名为DBCal

TCalendar继承一个新部件,名为TDBCalendar

Component PaletteSamples页中注册TDBCalendar

 

下面就是创建的代码:

 

unit DBCal;

 

interface

 

uses SysUtils, WinTypes, WinProc, Messages, Classes, Graphics, Controls,

Forms, Grids, Calendar;

type

TDBCalendar=class(TCalendar)

end;

 

procedure ReGISter;

 

implementation

 

procedure Register;

begin

RegisterComponents(Samples[TDBabendar]);

end;

 

end.

 

19.3.1.2 使控制只读

 

因为这个数据日历以只读方式响应数据,所以用户不能在控制中改变数据并指望它们反映到数据库中。

使日历只读包含下列两步:

增加只读属性

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:Delphi 简单数据库应用的创建及MASTAPP介绍(一)

下一篇:Delphi 对象链接与嵌入(二)