query1.CanModify:= true;???? 不可!错误:DTASET NOT IN EDIT OR INSERT MODE!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 query1.close; query1.sql.clear; query1.sql.add('select * from sales_data'); query1.sql.add('where client_no = '''+Edit1.text+''''); query1.open; with query1 do begin last; //query1.CanModify:=true;//==============错 query1.RequestLive:=true;//==============错 query1.FieldByName('remnant_q').asinteger:=strtoint(Edit9.text); query1.fieldbyname('sales_degree').asinteger:=1; end;???? 我也曾经碰到过这个问题,还是直接用SQL语句解决算了query1.close;query1.sql.clear;query1.sql.add('update sales_data set remant_q="'+ Edit9.text+'"' +',sales_degree ="'+intTostr(1) + '"' +'where client_no= "'+Edit1.text+'"')query1.excusql;应该就没有问题了 query1.close; query1.sql.clear; query1.sql.add('select * from sales_data'); query1.sql.add('where client_no = '''+Edit1.text+'''');query1.RequestLive:=true;//==============对 query1.open; with query1 do begin last; //query1.CanModify:=true;//==============错 query1.RequestLive:=true;//==============错 query1.FieldByName('remnant_q').asinteger:=strtoint(Edit9.text); query1.fieldbyname('sales_degree').asinteger:=1; end; to: ihihonline(小小->不要再流浪!!) 我执行到这句的时候:query1.RequestLive:=true;//==============对报错:could not find object!!!WHY????? to:STYun(天云) 我要修改最后一条记录! 不对!是执行到QUERY1.OPEN!时候报错!! recv返回10035错误是啥原因? delphi三层结构程序开发 一个很简单可是很难明白的问题 自建函数的用法 delphi开发的webservice不支持中文吗? 关于Treeview界面和业务分离的问题 请问大家有谁用过Delphi7自带的工具ModelMaker? 有需要可用分的回贴,如果你不缺就不要来冒充穷汉了 程序显示不正常? 这台电脑划算吗?急!!急!!!,如何测试这台二手电脑? 有人会做报表吗?三天了就是做不出来,是高手就进来吧! 读取ini文件中某个section的全部value 大概有2000条写到TRicheidt中,如何做速度更快!!!
query1.sql.clear;
query1.sql.add('select * from sales_data');
query1.sql.add('where client_no = '''+Edit1.text+'''');
query1.open;
with query1 do
begin
last;
//query1.CanModify:=true;//==============错
query1.RequestLive:=true;//==============错
query1.FieldByName('remnant_q').asinteger:=strtoint(Edit9.text);
query1.fieldbyname('sales_degree').asinteger:=1;
end;????
query1.close;
query1.sql.clear;
query1.sql.add('update sales_data set remant_q="'+ Edit9.text+'"' +',sales_degree ="'+intTostr(1) + '"' +'where client_no= "'+Edit1.text+'"')
query1.excusql;应该就没有问题了
query1.sql.clear;
query1.sql.add('select * from sales_data');
query1.sql.add('where client_no = '''+Edit1.text+'''');
query1.RequestLive:=true;//==============对
query1.open;
with query1 do
begin
last;
//query1.CanModify:=true;//==============错
query1.RequestLive:=true;//==============错
query1.FieldByName('remnant_q').asinteger:=strtoint(Edit9.text);
query1.fieldbyname('sales_degree').asinteger:=1;
end;
我执行到这句的时候:
query1.RequestLive:=true;//==============对报错:could not find object!!!
WHY?????
我要修改最后一条记录!