Form47是我的报表窗体,如果预览后最小化该窗体,则怎么也找不到最小化的窗体了Form47 := TForm47.Create(Application);
try
Form47.QuickRep1.Preview;
finally
Form47.free;
end;请问这类问题如何解决?能不能动态修改让用户不能按下最小化键,或干脆隐藏最小化键,请给出代码?对报表预览窗体设Form的BorderIcon的biMinimize属性为false无效,why?
try
Form47.QuickRep1.Preview;
finally
Form47.free;
end;请问这类问题如何解决?能不能动态修改让用户不能按下最小化键,或干脆隐藏最小化键,请给出代码?对报表预览窗体设Form的BorderIcon的biMinimize属性为false无效,why?
解决方案 »
- 新手如何循序渐进的提高自己的DELPHI技术,请高手和老手提点意见和建议并介绍几本比较好的书(本人有一定的DELPHI基础)
- 没分的问题,怎样使cxSpreadSheet装载数据的速度快一些!
- 关于win98下压缩一次access数据库后,没有自动对压缩后新加入的数据进行相应的压缩,win2K下没有这个问题。请高手指点。
- 关于delphi和VC联合编程的问题
- 请问这是什么控件?
- 如何生成这样的报表?
- 为什么我写的QREPORT报表只能显示一条记录?
- 请问用Ttable联接数据时(access,sql)怎么屏蔽要求输入口令的对话框
- 没法SHOW出窗口了?????????
- 再次提问:如何创建交叉统计报表。十万火急!!!!!!
- 一个简单的问题,请帮忙
- 难道是Delphi6的Bug吗?还望遇到过这样问题的大哥多多指教!
try
QuickRep1.Preview;
ShowModal; // 这句该有吧?
finally
free;
end;
什么意思?
报表预览QuickRep1.Preview就行了!
if RepForm = nil then
begin
//RepForm:=TRepForm.create(application);
if RepForm = nil then
Application.CreateForm(TRepForm, RepForm);
RepForm.Hide;
RepForm.QRLabel3.Caption := '客户名称';
RepForm.QRLabel13.Caption := datetostr(lsjl.datecontrol.DateTime);
RepForm.SeekData;
RepForm.quickrep1.preview;
//RepForm.show;
end
else
begin
RepForm.QRLabel3.Caption := '客户名称';
RepForm.QRLabel13.Caption := datetostr(lsjl.datecontrol.DateTime);
RepForm.SeekData;
RepForm.quickrep1.preview;
RepForm.bringtofront;
end;