ClientDataSet2.Close;
ClientDataSet2.CommandText:='select * from [user] where username='+#39+ ViewEdit1.Text +#39;
ClientDataSet2.Open;
ClientDataSet2.Edit ;
ClientDataSet2.FieldByName('money').AsInteger :=10;//strtoint(ClientDataSet2.FieldValues['money'])+ strtoint(Addmoney.text);
ClientDataSet2.Post;
ClientDataSet2.ApplyUpdates(-1);
ClientDataSet2.Close ;
这段代码能够顺利的执行完毕,但是我所有做的操作都无效,没有任何的结果!!

解决方案 »

  1.   

    ClientDataSet2是个本地数据集,不能post倒数据库
    要post倒数据库,用DataSet,ADODataSet
      

  2.   

    为什么要用ClientDataSet?用adodataset不好吗?
      

  3.   

    你查看数据库了吗?你怎么知道是无效的?
    ClientDataSet2.Close;
    ClientDataSet2.CommandText:='select * from [user] where username='+#39+ ViewEdit1.Text +#39;
    ClientDataSet2.Open;
    ClientDataSet2.Edit ;
    ClientDataSet2.FieldByName('money').AsInteger :=10;//strtoint(ClientDataSet2.FieldValues['money'])+ strtoint(Addmoney.text);
    try
      ClientDataSet2.Post;
      showmessage('保存成功!');
    except
      showmessage('保存失败!');
    ClientDataSet2.ApplyUpdates(-1);
    ClientDataSet2.Close ;你再试试!!