如何在delphi報表中顯示一變量或常量的值?(50分)

我有一報表,報表標題為公司名稱,公司名稱為在主程序中定義的變量或常量.我想在報表中用這樣一個變量或常量作為標題,不知如何做(我試了qblabel和qbexpr控件都不行.)?

procedure TMain_Form.BitBtn6Click(Sender: TObject);
begin
print_unit.titlestr:='银行方无电力方有的记录';
print_form.QuickRep1.Preview;
end;
end;
==========================================
var
titlestr :string;//标题
procedure Tprint_form.QuickRep1BeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
qrlabel1.Caption:=titlestr;
end;

用quick report中放一标签控件，然后在预览前用一般的赋值方法给其即可。
打印预览form.qrlabel.caption:=你的变量;
打印预览form.quickreport1.preview;