ado.Close;
ado.SQL.Clear;
ado.SQL.Add('update userinfo set 姓名=:A,性别=:B,年龄=:C,学历=:D where ID=:E');
ado.Parameters.ParamByName('A').Value:=trim(edit2.Text);
ado.Parameters.ParamByName('B').Value:=trim(edit3.Text);
ado.Parameters.ParamByName('C').Value:=trim(edit4.Text);
ado.Parameters.ParamByName('D').Value:=trim(edit5.Text);
ado.Parameters.ParamByName('E').Value:=trim(edit1.Text);
ado.ExecSQL;
其中:ado为ADOQuery控件