关于QUICKREPORT报表的问题,在线等答案！

Question

怎么样用代码在QUICKREP上创建QRSubDetail,然后在QRSubDetail中创建QRChart?

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
    QRSubDetail1: TQRSubDetail;
    QRDBChart1: TQRDBChart;
    QRChart1: TQRChart;
begin
   QRSubDetail1:=TQRSubDetail.Create(QuickRep1);
   QRSubDetail1.Parent:=QuickRep1;
   QRSubDetail1.Height:=200;
   QRSubDetail1.Name:='QRSubDetail1';
   QRChart1:= TQRChart.Create(nil);
   QRChart1.Parent:=QRSubDetail1;
   QRDBChart1:= TQRDBChart.Create(nil);
   QRDBChart1.Parent:=QRChart1;
// QuickRep1.Preview;
end;