急希望高手帮我解决此问题(50分)

  • 主题发起人 主题发起人 myserver
  • 开始时间 开始时间
M

myserver

Unregistered / Unconfirmed
GUEST, unregistred user!
我想在打印的时候QRDBTEXT1的字段名AAA AND QRDBTEXT2的字段名BBB
AND QRDBTEXT3的字段名CCC 在打印到第三条记录的时候QRDBTEXT1的字段名变为另一个
字段名为DDD,QRDBTEXT2的字段名EEE,QRDBTEXT3的字段名FFF,不过字段名为DDD,EEE,FFF
的qrdbtext要从第一条记录打印
 
各位高手不要令我希望小弟初来贵地
 
你可以设两个变量
在Private 中定义
i : integer;{自增变量}
bl : Boolean;{标识字段是否改变}
在AfterPrint事件中
begin
if i < Table1.RecordCount then
Inc(i);
end;
在QrDBText1的OnPrint事件中
begin
if (i > 2) and not bl then
begin
QrDBText1.DataField := 'DDD';
Table1.First;
bl := true;
end;
Value := Table1.FieldByName(QrDBText1.DataField).asstring;
end;
在QrDBText2/3的Onprint事件中同上面差不多操作。
我试过一下没问题。
OK?
 
>>我试过一下没问题。
>>OK?
我想也是,
其实你在OnNeedData事件中,手工提供数据即可,自由度比较大
 
后退
顶部