Question

delphi7想做个增删改查。

delphi7,(用ADO 连接SQL Server2008):其他功能都能搞定，但就是修改功能还不会，请大神帮帮忙啊！
代码：
procedure TForm3.Button3Click(Sender: TObject);begin with ADOQuery2 do begin adoquery1.SQL.Clear ; adoquery1.SQL.Add('update denglu set us='''+trim(edit1.Text)+''',pw='''+trim(edit2.Text)+''''); adoquery1.ExecSQL; end; formshow(Sender);
end;
问题出在 FormShow(Sender); 提示错误[Error] Unit3.pas(80): Undeclared identifier: 'formshow'
界面做的如图所示

Answer 1

把formshow(sender) 这行去掉

追问

去掉？去掉 是可以运行，但修改总是出现错误啊

追答

adoquery1的连接属性设了吗？
你是用哪个控件来查询出这些数据的adoquery1?

追问

设好了，用的就是adoquery1, 加Q 吧 二七9五0一0九4

追答

//如果是单表查询可以这样进行记录编辑
procedure TForm3.Button3Click(Sender: TObject);
begin
  
   adoquery1.edit ;
   adoquery1.fieldbyname('us').asString=edit1.Text;
   adoquery1.fieldbyname('pw').asString=edit2.Text;
   adoquery1.post;

end;