08_Delphi和数据库.pptVIP

第八章 Delphi 7与数据库;8.1 Delphi7的数据库访问机制;一、 Delphi与数据库;二、Delphi的数据库体系;三、 Borland数据库引擎（BDE）;8.2 数据库组件;BDE组件集（BDE页）：提供了以BDE方式访问数据库的数据表和查询等数据集组件，如TTable、TQuery、TStoredProc等； 数据访问组件集（DataAccess页）：提供了数据源等连接组件； 数据控制组件集（DataControls页）：用来浏览和编辑数据，为用户使用数据库提供接口，如TDBGrid、TDBEdit、TDBMemo等。 ;一、TTable组件 ;1. TTable组件连接数据表的一般步骤 步骤一：把一个TTable组件放到窗体上，设置DatabaseName属性指定要访问的数据库。 步骤二：设置TableName属性指定要访问的表。 步骤三：把一个TDataSource组件放到窗体上，设置DataSet属性指向该TTable组件。 步骤四：把一个数据控制组件放到窗体上，设置DataSource属性指向该DataSource组件。 步骤五：把TTable组件的Active属性设为True。 ;2. 字段组件的访问 字段组件对应着数据表中实际的字段，读写数据表中的字段值是通过访问相应的字段组件进行的。一般采用的方法有两种： 使用数据集组件的Fields属性 可以通过Fields属性的下标（即索引号）来访问各字段，索引号从0开始。例如，Table1.Fields[0]表示当前记录的第一个字段的数据。如： Table1.Fields[0].AsString:=Edit1.Text; Edit1.Text:=Table1.Fields[0].AsString;;使用数据集组件的FieldByName方法 用这种方法访问字段组件时，必须知道数据表中各个字段的名字。例如： Edit1.Text:=Table1.FieldByName (‘FieldName).AsString; ;数据集的打开和关闭;移动记录指针;Last方法：将记录指针移至数据集的最后一条记录处，并使之成为当前记录，同时将Eof属性值设置为True。 Next方法：将记录指针后移一条记录，并使之成为当前记录。如果记录指针指向了数据集的最后一条记录，将Eof属性设置为True。 Prior方法：将记录指针前移一条记录，并使之成为当前记录。如果记录指针指向了数据集的第一条记录，将Bof属性设置为True。 MoveBy方法：将记录指针从当前记录开始向后或向前移动若干条记录。格式如下： function MoveBy(Distance:Integer):Integer;;Table数据集的修改;Insert方法：在当前记录之前插入一个新的空记录，并将新记录作为当前记录。用户向记录的字段中输入数据后，通过调用Post方法将这些更改提交给数据库。 Append方法：在文件的最后追加一条新的记录。 Edit方法：使数据集处于编辑状态，此时才可对数据集进行编辑修改操作。 Delete方法：删除数据集中的当前记录，并使当前记录指向下一条记录。 Post方法：使当前对数据集所作的修改有效，即对数据集所作的修改写入到数据库中。调用了Edit、Insert或Append等方法后，需要调用Post方法将修改的数据写回数据库。 DataSet1.Insert; DataSet1.FieldByName(QUANTITY).AsInteger := StrToInt(Edit1.Text); ClientDataSet1.Post; Cancel方法：使当前对数据集所作的修改无效，即取消对数据集所作的修改。;AppendRecord方法与InsertRecord方法：这两个方法分别与Append方法和Insert方法相似，它们都是用于在表中插入一条新记录，但AppendRecord方法和InsertRecord方法比Append方法和Insert方法更简单、更方便一些，不需调用Post方法。 Table1.InsertRecord([00,李青,女, 1982-3-2,true,01]);;SetFields方法：以参数的形式来修改当前记录中的多个字段值。其过程形式如下： table1.Edit; table1.SetFields([nil,nil,nil,1988-4-4]); table1.post; Refresh方法：从数据库中取出数据来更新数据集的内容。它保证了应用程序拥有数据库的最新