delphi - 删除具有特定条件的adotable中的记录

Question

我尝试过在网上查找，但没有成功， 我如何删除按钮单击中的所有记录，这些记录符合不同的条件。例如，我希望能够删除 adotable 中的所有记录，其中 Labour_ID(这是 adotable 中的字段名称)等于 DBedit.Text。

抱歉，这有点含糊，但我们将不胜感激。谢谢

Answer 1

您可以使用简单的循环删除行:

while ADOTable1.Locate('Labour_ID', Edit1.Text, []) do
  ADOTable1.Delete;

更好的是使用 TADOQuery，并使用 SQL 来完成:

ADOQuery1.SQL.Text := 'DELETE FROM YourTable WHERE Labour_ID = :Labour_ID';
ADOQuery1.Params.ParamByName('Labour_ID').AsString := Edit1.Text;
ADOQuery1.ExecSQL;

请参阅关于 TDataSet.Locate 的 Delphi 文档有关最后一个 LocateOptions 参数的信息。 (该链接指向 XE2 的文档，但自 D7 以来，ADO 没有发生太大变化(如果有的话)。