初学，极其简单的问题

[MasterMengYi]

  id:=dbgrid1.DataSource.DataSet.Fields[0].AsString;
   upstr:='update zuozhe set zuozhe='+#39+trim(edit1.Text)+#39+' where zuozheid='+id;
    adoquery1.SQL.Text:=upstr;
    adoquery1.Close;
    adoquery1.ExecSQL;
    adoquery1.Active:=true;
    datasource1.dataset:=adoquery1;//出错，
    dbgrid1.DataSource:=datasource1;

首先在页面加载时绑定dbgrid，然后选择一行后，在edit1中输入文字，然后单击按钮执行以上代码，目的是更新数据‘zuozhe’。
现在能正常更新，但在注释处出错：当前提供程序不支持从单一执行返回多个记录集。
是不是datasource不能重新添加DataSet？
帮解释下，对delphi中的数据操作很陌生

[starluck]

id:=dbgrid1.DataSource.DataSet.Fields[0].AsString;
   upstr:='update zuozhe set zuozhe='+#39+trim(edit1.Text)+#39+' where zuozheid='+id;
    Adoquery1.close;
    adoquery1.SQL.Text:=upstr;
   // adoquery1.Close;
    adoquery1.ExecSQL;
    Adoquery1.close;
    adoquery1.sql.text := 'select * from zuozhe';
    adoquery1.Active:=true;
    datasource1.dataset:=adoquery1;//出错，
    dbgrid1.DataSource:=datasource1;

UPDATE後你要返回的是數據集，所以必段重新打開那個表

[7年]

貌似你的顺序不对。
adoquery1.Close;
adoquery1.sq.clear;
adoquery1.SQL.add(upstr);
adoquery1.open;

[MasterMengYi]

谢谢，明白