删除数据表中的记录

1．用SQL语句DELETE对数据表中的记录进行删除

SQL语句DELETE可以对表中的一条记录或多条记录进行删除，主要是用WHERE子句来设置条件范围，该关键字的应用与在UPDATE语句中是一样的，可以参见UPDATE语句。查询条件为字符串时，两边必须加单引号，例如：select * from mm where name=‘张某’。

下面利用SQL语句DELETE对单个记录进行删除或批量删除。

操作步骤如下：

（1）运行Delphi，在窗体中添加TADOConnection、TADOQuery、TDataSource、TButton、和TDBGrid等组件。

（2）主要程序代码如下：

with ADOQuery1 do

begin

Close;

SQL.Clear;

if (Trim(ComboBox1.Text)<>'id') then

SQL.Add('DELETE MR_Table where '+ComboBox1.Text+ComboBox2.Text+''''+Edit1.Text+'''')

else

SQL.Add('DELETE MR_Table where '+ComboBox1.Text+ComboBox2.Text+Edit1.Text);

ExecSQL;

end;

2．用DELETE方法对当前记录进行删除

DELETE方法只能对当前记录进行删除。只要将指针指向要删除的记录上，并使用DELETE方法便可以删除，例如将指针指向第3条记录，再使用如下代码便可以删除该记录。

ADOQuery1.Delete;