在FORM_A的一个按钮的事件中有如下代码,rptproject为带有QREPORT的FORM,关闭QREPORT的preview后FORM_A也被关闭了
rptproject:=trptproject.create(application);
try
rptproject.lbl_title.caption:=str;
rptproject.lbl_username.caption:=g_username;
rptproject.r1.preview;
finally
rptproject.free;
rptproject:=nil;
end;