知识大全 Delphi数据库控件使用入门（三）

Posted 2022-07-22 属性

篇首语：从来好事天生俭，自古瓜儿苦后甜。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 Delphi数据库控件使用入门（三）相关的知识，希望对你有一定的参考价值。

Delphi数据库控件使用入门（三） 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　使用TDBGrid

　　TDBGrid构件以栅格的形式显示和编辑数据集中的数据它的外观很大程度上取决于下面三个因素 l 一是永久的列对象二是永久的字段对象三是数据集构件的ObjectView属性将影响ADT和数组字段的显示方式对于TDBGrid构件来说最重要的属性是Columns 这是一个TDBGridColumns对象用于管理一组TColumn对象在设计期可以打开一个编辑器建立永久的列对象然后在对象观察器中设置列对象的属性

　　动态的列对象

　　如果TDBGridColumns的State属性设为csDefault 列是动态生成的列的属性取决于字段的属性当字段的属性发生变化时列的属性也跟着变化让列动态生成的好处是可以在运行期动态地选择其他数据集而不用担心栅格是否适合于显示新的数据集例如可以用同一个TDBGrid构件先显示一个Paradox表再显示查询另一个数据库的结果在设计期无法直接修改动态列对象的属性只能修改字段对象的属性从而间接地修改动态列对象的属性

　　动态列对象的生存期也取决于字段对象的生存期如果数据集没有建立永久的字段对象那么当数据集关闭时所有的动态列对象也将消失注意如果在运行期把TDBGridColumns的State属性设为csDefault 将删除所有的列对象然后根据数据集中的字段对象重建列对象

　　要能够在设计期自定义栅格就要用到永久的列对象建立了永久的列对象后如果TDBGridColumns的State属性设为csCustomized 就可以独立设置每一列的属性例如默认情况下列的标题显示字段的标签即DisplayLabel属性通过修改TColumnTitle的Caption属性可以重新指定列的标题而TField的DisplayLabel属性则不会受到影响 TDBGridColumns的State属性设为csCustomized适合于那些数据集的结构是固定不变的情况如果需要在运行期切换不同的数据集就不能把State属性设为csCustomized 要创建永久的列对象首先要在窗体上选择TDBGrid构件然后对象观察器中单击Columns属性边上的省略号按钮将打开编辑器

刚开始的时候这个编辑器是空白的这是因为默认情况下栅格中的列对象都是动态生成的还没有永久的列对象要基于数据集中的每一个字段分别创建一个永久的列对象可以单击鼠标右键在弹出的菜单中选择 Add All Fields 命令要创建一个独立的永久列对象可以单击工具栏上的(Add New)按钮选择这个刚创建的列对象然后在对象观察器中设置FieldName属性指定一个字段设置Caption属性指定列的标题要删除一个列对象可以单击工具栏上的(Delete Selected)按钮如果把永久的列都删掉栅格反而能显示数据集中所有的字段这是因为永久的列删掉以后 Delphi 会自动把TDBGridColumns的State属性设为csDefault并且动态生成所有的列

　　要调整列在栅格中显示的顺序可以用鼠标把列对象前移或后移对于永久的列对象来说它的属性的默认值仍然取自于字段除非您修改了永久列对象的属性例如默认的情况下列的标题就是字段的DisplayLabel属性如果修改字段的DisplayLabel属性列的标题将随之改变但是一旦您修改了列对象的Caption属性列的标题不再与字段的DisplayLabel属性存在联动关系它们彼此是独立的

　　前面讲过创建一个永久的列对象时需要设置FieldName属性指定一个字段不过您也可以让FieldName属性为空此时 TColumn对象的Field属性将返回NULL 并且该列在栅格中是空白的空白的列往往用于用户显示一些自定义的内容如图像或图表等几个列对象的FieldName属性可以设为同一个字段由此可见 TDBGrid的FieldCount属性可能小于栅格的列数

　　数据源

　　TDataSource构件是一个非可视的构件它充当了数据集和数据控件之间的桥梁每一个数据控件都必须指定一个数据源(TDataSource构件) 相应地 TDataSource构件的DataSet属性必须指定一个数据集下面简单介绍一下TDataSource构件的属性和事件 DataSet属性用于指定一个数据集在设计期可以在对象观察器中为DataSet属性选择一个数据集在运行期可以通过代码动态地选择数据集程序示例如下

　　With CustSource Do　　Begin　　If DataSet = Customers then　　DataSet := Orders 　　Else　　DataSet := Customers ;　　End;

　　也可以指定另一个窗体上的数据集构件例如

　　Procedure TForm FormCreate (Sender : TObject);　　Begin　　DataSource Dataset := Form Table ;　　End;

　　一般情况下 TDataSource构件的名称是无关紧要的不过 TDataSource构件的名称应当能反映它所连接的数据集例如假设TDataSource构件连接的数据集叫Customers 相应地 TDataSource构件的名称最好叫CustomersSource

　　Enabled属性用于控制TDataSource构件是否与数据集连接设为True表示连接设为False表示暂时断开连接如果Enabled属性设为False 凡是连接于这个数据源的数据控件将变成空白如果AutoEdit属性设为True 当用户在数据控件中键入字符时数据集就自动进入dsEdit状态如果AutoEdit属性设为False 程序必须调用Edit函数才能进入dsEdit状态

cha138/Article/program/Delphi/201311/8450