回 帖 发 新 帖 刷新版面

主题:请教一下delphi中删除sql数据库的一条记录的问题

procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.SQL.Add('delete from mypet where pet_name = '+'''+mary+''')
end;


我用delphi引入了一个数据库mypet,想按button1的时候删除pet_name为mary的一行记录,可运行之后点击按钮没有反应,请高手给看看。

回复列表 (共1个回复)

沙发

procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.SQL.Add('delete from mypet where pet_name = '+'''+mary+''');
adoquery1.ExecSQL;
adoquery1.Refresh;
end;

我来回复

您尚未登录,请登录后再回复。点此登录或注册