为什么这样不能得到前一单的单号呢? ( 积分: 50 )

  • 主题发起人 主题发起人 tonyyang
  • 开始时间 开始时间
T

tonyyang

Unregistered / Unconfirmed
GUEST, unregistred user!
为什么这样不能得到前一单的单号呢?<br>在业务单据上点击前一单,后一单,分别出现对应的单据明细,但是我这段代码确不能得到前一单的单号,这是为什么呢??请指教!!代码如下:<br>with&nbsp;data.ADOQ3&nbsp;do<br>begin<br>close;<br>sql.Clear;<br>sql.Add('select&nbsp;*&nbsp;from&nbsp;t_cgph&nbsp;where&nbsp;cgph=:a');<br>parameters.ParamByName('a').Value:=cgph.Text;<br>open;<br>end;<br>if&nbsp;data.ADOQ3.recordcount&gt;0&nbsp;then<br>begin<br>data.ADOQ3.prior;<br>s:=data.ADOQ3.fieldbyname('cgph').asstring;<br>cgph.Text:=s;<br>end;
 
原来这样就行了!<br>begin<br>with&nbsp;data.adoq3&nbsp;do<br>begin<br>close;<br>sql.clear;<br>sql.add('select&nbsp;max(cgph)&nbsp;from&nbsp;t_cgph&nbsp;where&nbsp;cgph&lt;:a');<br>parameters.parambyname('a').value:=cgph.text;<br>open;<br>end;<br>cgph.text:=data.adoq3.fields[0].asstring;
 

Similar threads

回复
0
查看
861
不得闲
D
回复
0
查看
929
DelphiTeacher的专栏
D
D
回复
0
查看
870
DelphiTeacher的专栏
D
D
回复
0
查看
943
DelphiTeacher的专栏
D
后退
顶部