这样打开报表对吗？在线.....(10分)

var
f_pop: Tf_pop;
report: TQuickRep;
implementation
uses U_pop_main, Unit1;
{$R *.dfm}
procedure Tf_pop.Button1Click(Sender: TObject);
begin
//f_pop_main:=tf_pop_main.Create(self);
//f_pop_main.QuickRep1.Preview;
report.Preview;
end;
procedure Tf_pop.RadioButton1Click(Sender: TObject);
begin
Report:=f_pop_main.QuickRep1;
//工资...
end;

有没有人呀....