Question

delphi中如何实现对sql数据库记录进行添加,删除,修改

我用的是ADO连接数据库，用按钮进行相关操作，现求代码

Answer 1

可以用ADO里的ADOQuery，ADOTable，ADOConnection都可以进行这类操作,例使用ADOQueryWith ADOQuery1 dobegin Close;SQL.Clear; SQL.Add('Insert into 表 (字段...) Values (字段值....)'); //添加记录 ExecSQL; Close;SQL.Clear; SQL.Add('Delete from 表 Where 字段=值....'); //删除记录 ExecSQL; Close;SQL.Clear; SQL.Add('Update 表 Set 字段=值.... Where 条件'); //修改记录 ExecSQL;end;或者先打开记录，再直接操作With ADOQuery1 dobegin Close;SQL.Clear; SQL.Add('Select * from 表 Where 字段=值....'); //查询记录 Open; Append; Fieldbyname('字段名').Value:=值; //添加并赋值 post; //提交 Edit; Fieldbyname('字段名').Value:=值; //修改+赋值 post; //提交 Delete; //删除end;用ADO类的其它控件操作方式相似。

Answer 2

使用ADO，首先用ADOConnection对象建立连接，然后使用ADOQuery对象对数据库进行操作。ADOQuery对象操作：查询：先使用close；再设置SQL.text为SQL查询语句内容；最后使用OPEN方法打开添加：Append或Insert；FieldByName（'字段名'）.Value := 字段内容；Post；修改：Edit；FieldByName（'字段名'）.Value := 字段内容；Post；删除：定位到指定记录（使用循环）；Delete；