数据浏览组件范例.ppt

第7章 数据浏览组件 7.1 数据浏览组件概述 大多数的数据浏览组件是从标准组件中演变过来的，它们具有一些相似的特性，如DBGrid组件和StringGrid组件，DBEdit和Edit组件，DBListBox和ListBox等等，只是数据浏览组件是专门用于显示和编辑数据库中记录的字段信息而已。大部分的数据浏览组件都且有数据感知能力，所谓数据感知能力是指在应用程序期间，当数据浏览组件通过TDatasource组件和数据集 组件连接到一个数据库时，便可观看到数据库中的数据信息，也就是说在程序设计阶段便可以看到应用程序运行之后的效果。 7.1.1 共同的属性 数据控制组件具有一些共同的属性，用于连接的TDatasource组件和TField组件。 1．Datasource属性 说明数据浏览组件连接的数据源组件TDatasource，数据浏览组件是从TDatasource组件中获取数据的。 2．DataField属性 说明数据浏览组件对应数据库表中实际的字段名称。该属性的值其实是TDataSource连接的数据集组件TTable或TQuery组件中的字段组件的名字。 7.1.2 显示和编辑数据的一般步骤 显示和编辑数据的一般步骤是： (1)把一个数据集放到表单或数据模块上，设置好其与数据库连接的属性，如对TTable，DatabaseName属性指定要访问的数据库，设置TableName属性指定要访问的表。 (2)把一个TDataSoure组件放到表单或数据模块上，设置好DataSet属性指定数据集。 (3)把一个数据感知组件（如TDBGrid）放到表单上，设置DataSource属性。 (4)设置数据感知组件的DataField属性指定要显示的字段。有的数据感知组件以数据库的一个或几个字段作为工作内容，如TDBText和TDBEdit；而有的数据感知组件以整个数据集为工作内容，如TDBGrid和TDBNavigator。对于后者，不需要设置DataField属性。 (5)把数据集的Active属性设为True，马上就能看到数据。 7.1.3 编辑和更新数据 除了TDBNavigator构件外，其他数据控件都是用来显示和编辑数据的。这里要介绍怎样编辑数据。要使用户能编辑数据，数据集必须进入dsEdit状态。如果TDataSource的AutoEdit属性设为False，用户不能直接编辑数据，除非程序调用Edit函数。 要使用户能够在数据控件中修改数据，必须把数据控件的ReadOnly属性设为False。如果ReadOnly属性设为True，数据控件中显示的数据就是只读的。一般情况下，TDataSource构件的Enabled属性设为True。如果这个属性设为False，数据控件就无法显示数据，更不能修改数据。如果数据集构件的ReadOnly属性设为True，数据集就是只读的，用户在数据控件中所作的修改不能写到数据集中。除了TDBGrid构件外，当用户修改了一个字段的值，还需要把输入焦点移走，新的数据才写到数据集中。在移走输入焦点之前，用户随时可以按ESC键取消修改。在TDBGrid构件建立的栅格中，当用户修改了一个字段的值，还需要把输入焦点移到另一条记录上，新的数据才写到数据集中。 7.1.4 禁止和允许数据刷新 当程序正在遍历整个数据集或者搜索一个特定的记录时，应当暂时禁止数据控件刷新数据，这样能加快遍历或搜索的速度，防止屏幕总是在闪烁。调用数据集的DisableControls可以暂时禁止连接这个数据集的数据控件刷新数据。DisableControls函数通常在循环操作前调用。等循环结束后，程序应当立即调用数据集构件的EnableControls函数重新允许刷新数据。为了确保最后总是能恢复刷新，建议采用Try...Finally结构。这样，即使在循环中出现异常，也可以保证总能调用EnableControls。 下面的代码演示了怎样调用DisableControls和EnableControls函数： CustTable.DisableControls; Try CustTable.First; ? While not CustTable.EOF Do Begin ...CustTable.Next; End; Finally CustTable.EnableControls; End; 7.2 数据浏览组件 7.2.1 DBGrid组件 DBGrid组件主要用于将数据源的信息显示在网格中，它以行和列组成的栅格显示数据库中的数据。要使其显示数据库中的数据，只要设置好Datasource属性即可。 1 基本属性 DBGrid组件的基本属性如表7-2所示： （1）Columns Colum