Borland Delphi教学讲义 第9章.ppt

. 9.4 常用数据库组件 ② 用 Append 方法实现插入功能 在“插入”按钮的Onclick事件的处理程序中加入如下代码： (* 实现在尾部插入一条职工号为“111003”的记录*) procedure TForm1.Button2Click(Sender: TObject); begin Table1.Append; //设置为插入状态 Table1.Fields[0].AsString:=111003; //设置要插入的值 Table1.Post; //将插入的记录写回数据库 End; 9.4 常用数据库组件 (4) 删除功能实现 在“删除”按钮的Onclick事件的处理程序中加入如下代码： procedure TForm1.Button3Click(Sender: TObject); begin Table1.Delete; //删除记录指针指向的记录 End; (5) 更新功能实现 在“更新”按钮的Onclick事件处理程序中加入如下代码： procedure TForm1.Button3Click(Sender: TObject); begin Table1.Edit; //将Table控件置成编辑状态 Table1.Fields[0].AsString:=王芳 Table1.Post; //将修改后的记录写回数据库 End; 9.4 常用数据库组件 2．TQuery组件 (1) 用途 Delphi中的另一个重要的数据集组件是TQuery，它需要使用SQL语言命令来进行查询。Delphi通过TQuery组件实现了对SQL语言的支持，在Delphi开发的数据库应用程序中，SQL语句通过TQuery组件传递到要访问的数据库系统的数据库引擎上，由数据库引擎具体执行SQL语句，以实现对数据的操作，而不是传递给Delphi中的BDE，由BDE实施具体的SQL动作。 9.4 常用数据库组件 (2) 主要属性 ① DatabaseName属性 ② SQL属性 ③Active属性 ④ Filter属性 ⑤ Filtered属性 ⑥ Params属性 ⑦ ExecSQL方法 9.4 常用数据库组件 (3) 静态SQL语句和动态SQL语句 Delphi中使用的SQL语句有两种：静态SQL语句和动态SQL语句。 静态SQL语句是指在程序设计阶段，设置TQuery组件的SQL属性。这样当设计阶段或者在程序执行阶段设置TQuery组件的Active属性为true时，或者在程序运行期间调用TQuery组件的Open或ExecSQL方法执行SQL语句。 动态SQL语句是指在SQL语句中包含一些参数变量，在程序运行过程中这些变量的值都是可变的。例如可以设置SQL属性为： Select * from Employees where 姓名= :name; 其中name变量便是一个参数变量，它由一个冒号引导，在程序运行过程中要为参数变量赋值才行，不然SQL语句不能正确执行。 9.4 常用数据库组件 (4) TQuery组件的使用方法 执行SQL语句有两种方式：一种是在设计期间把Active属性设为true，程序会自动执行SQL语句：另一种方式是在程序运行期间调用TQuery组件的Open或者ExecSQL方法执行SQL语句。如果希望返回查询结果，调用Open，如果不需要返回查询结果，调用ExecSQL。在调用Open或ExecSQL之前，最好先调用Prepare方法通过服务器做好准备。执行SQL所返回的查询结果实际上是数据集中满足特定条件的记录所组成的子集，数据库表格只显示符合特定条件的记录。 在程序运行过程中，首先调用TQuery组件的Close方法关闭当前的SQL调用，然后调用SQL的Clear方法清除SQL属性，并使用SQL的Add方法增加新的SQL命令到SQL属性中。 9.4 常用数据库组件 在程序运行过程中，首先调用TQuery组件的Close方法关闭当前的SQL调用，然后调用SQL的Clear方法清除SQL属性，并使用SQL的Add方法增加新的SQL命令到SQL属性中。 由于在程序运行过程中，程序设计人员是无法确定TQuery组件中的SQL语句是否会返回一个查询结果，所以执行SQL语句时经常在Try…Except模块中。一般形式如下： Try Queryl.Open; Except Query1.ExecSQL; end; 9.4 常用数据库组件 如果使用动态SQL语句，首先调用Prepare方法，给动态SQL语句中的参数赋值，然后再调用Open方法或ExecSQL方法。调用Prepare方法并不是必须的，但是对于要多次执行 TQuery组件中