动态形成的的报表控件如何引用(100分)

  • 主题发起人 主题发起人 jarl99
  • 开始时间 开始时间
J

jarl99

Unregistered / Unconfirmed
GUEST, unregistred user!
请哪位大侠指教,我在TQuickReport对象的BeforePrint事件响应方法中动态形成的TQRDBText类型的控件并命名为TextField1
怎么能在TQuickReport中的控件TQRBand的BeforePrint事件响应方法中引用TextField1
(我直接引用是不能编译)
procedure TQuickReport1.QuickRepBeforePrint(Sender: TCustomQuickRep;var PrintReport: Boolean);
var
myText: TQRDBText;
begin
myText := TQRDBText.Create(self);
myText.name='TextField1';
.......
.......
end;

procedure TQuickReport1.oDetailBandAfterPrint(Sender: TQRCustomBand;BandPrinted: Boolean);
begin
//怎么在此引用(目的是想根据数据库的值判断是否打印当前记录的对应某字段值)
end;
 
使用TDBText(FindComponent('TextField1'))就可以引用。
 
谢谢,我已经成功拉!100分奉上
 
后退
顶部