Question

我对delphi比较陌生，我想知道如何在不使用dbNavigator而是使用按钮的情况下删除dbGrid中的条目。必须在spinedit中输入应删除的条目的编号，而不是在dbGrid中单击。谢谢你的帮助。

Answer 1

首先，在DataSet的第一个记录中定位很好，然后它将从第一个记录中删除到第N个记录。

DBGrid1.DataSource.DataSet.First;

现在你创建循环（不要忘记创建变量{ var I：integer }）

For I:=0 to SpinEdit1.Value-1 Do

在开始删除记录之前，您需要验证DataSet上是否有任何记录。
你可以这样做：

if DBGrid1.DataSource.DataSet.RecordCount > 0 then

最后你可以删除记录

DBGrid1.DataSource.DataSet.Delete;

最终的代码是这样的：

DBGrid1.DataSource.DataSet.First; //Set on the first Record of the DataSet
For I:=0 to SpinEdit1.Value-1 Do //Do loop
   if DBGrid1.DataSource.DataSet.RecordCount > 0 then //Check if have records
       DBGrid1.DataSource.DataSet.Delete; //Delete

使用Delphi中的按钮删除DBGrid中的条目

1 个答案: