Delphi中使用TFDQuery删除记录

Question

帮助我解决此问题以使用TFDQuery删除记录。

当我使用Edit.Text或DBEdit.Text选择这个记录值时，我会这样尝试，但它不起作用：

FDQuery.SQL.Text := 'delete * FROM MyTable column_name =:KEY1 ';
FDQuery.ParamByName('KEY1').AsString = 'dbedit.text';
FDQuery.Open;

Answer 1

  fdquery.SQL.Text := 'DELETE FROM MyTable WHERE column_name = :KEY1';
  fdquery.ParamByName('KEY1').AsString := dbedit.Text;
  fdquery.Execute();

您也可以使用 TFDCommand 而不是 TFDQuery，因为您不希望读取结果：

  fdcommand.CommandText := 'DELETE FROM MyTable WHERE column_name = :KEY1';
  fdcommand.ParamByName('KEY1').AsString := dbedit.Text;
  fdcommand.Execute();

如果这是您希望重复使用的命令，您可以在设计时将 SQL 语句与参数名称一起放入命令中，然后在运行时您只需要执行以下操作：

  fdcommand.ParamByName('KEY1').AsString := dbedit.Text;
  fdcommand.Execute();

根据您使用的底层数据库，预先填充命令可以允许提前准备查询。 对于复杂的查询（不像这个查询），这意味着执行计划只构建一次。