fsReport1.LoadFromFile('E:\a.frf');
fsReport1.showreport;
fsReport1.showreport;
解决方案 »
- 下面的情况,究竟应用DataSet的Open还是Execute,或者其它方案?
- 如何设置程序的菜单字体,而又不改变系统菜单字体?
- 发现一个好网站,不敢独享
- 帮忙看看!!!
- TextOut如何加上或去除其文字的背景色?
- 在线等待:请帮帮mm
- 想把一些图片合成.avi或其他格式的视频文件
- 100分求助--想找一些开源的分布式系统
- 关于应用程序服务器的问题向大家请教!
- delphi程序员求职
- 我的程序在调用了自己编写的.dll后,关闭程序会提示"kernel32.dll"发生错误
- (伴水)请帮我看看这个问题好吗?谢了http://www.csdn.net/Expert/topic/447/447139.shtm
不知为什么,
type
TForm1 = class(TForm)
frSpeedButton1: TfrSpeedButton;
wwDataSource1: TwwDataSource;
wwTable1: TwwTable;
frReport1: TfrReport;
frDBDataSet1: TfrDBDataSet;
frPreview1: TfrPreview;
procedure frSpeedButton1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.frSpeedButton1Click(Sender: TObject);
beginfrReport1.LoadFromFile('E:\report\a.frf');
frReport1.showreport;
end;
report:TfrReport;
begin
report:=frdenjibiao;
report.LoadFromFile('E:\report\a.frf');
report.ShowReport;
我自己已经解决了,少加了个控件
chart控件