帮看一下以下代码(50分)

DataModule17.ADOQ94.First;<br>while not (DataModule17.ADOQ94.Eof) &nbsp;do<br>begin<br>&nbsp; &nbsp;s:=INTTOSTR(DataModule17.ADOQ94.FieldByName('RECN').AsInteger);<br>&nbsp; &nbsp;DataModule17.ADOQ94.Edit;<br>&nbsp; &nbsp;if length(s)=0 then S:='0000'+S;<br>&nbsp; &nbsp;if length(s)=1 then S:='000'+S;<br>&nbsp; &nbsp;if length(s)=2 then S:='00'+S;<br>&nbsp; &nbsp;if length(s)=3 then S:='0'+S;<br>&nbsp; &nbsp;DataModule17.ADOQ94.FieldByName('XTDFBAK').AsString:=trim(S)+DataModule17.ADOQ94.FieldByName('XTDFBAK').AsString;<br>&nbsp; &nbsp;DataModule17.ADOQ94.Post;<br>&nbsp; &nbsp;DataModule17.ADOQ94.Next;<br>&nbsp; &nbsp;label4.Caption:=S;<br>end;<br>怎么没有保存字段XTDFBAK更新后的内容,请高手帮瞧瞧啊

DataModule17.ADOQ94.Post;这句大概是保存的吧。

我也是这么认为的,把DataModule17.ADOQ94连到DBGRIDE中看数据是存了,可到SQL查询中看是没有保存,怪了!!也没有报错

可能是这个控件的特有功能，实际上并没有真正的提交修改

代码虽然不好看，也没什么错误、一种可能是你的ADOQ94用了缓存更新，如果是这样，修改是没有提交到后台数据库，出现的情况将和你描述的一样。检查看看是不是这个原因。

不知道楼主表中有没有记录，看代码没什么问题

在END后面加了一句<br>DataModule17.ADOQ94.UpdateBatch();<br><br>可以了,谢谢各位,散花.<br><br>太码写的太差,以后会多多努力!!!

多人接受答案了。