fastreport2.5的chart能不能画出多条线来?(50分)

  • 主题发起人 主题发起人 edak
  • 开始时间 开始时间
E

edak

Unregistered / Unconfirmed
GUEST, unregistred user!
刚刚开始用fastreport2.5,发现它里面的chart对象属性里面只能设置单项统计,比如线性图,只能画一条线,我怎样才能画出多条线来呢?
 
参见他的FAQ
2.26. How to make the TChart with several series?
You can'tdo
this in designer. You need to write some code in Delphi.
Create TChart or TDBChart, fill it out;
put the empty TfrChartView to the report;
write the following code in the TfrReport.OnBeforePrint event handler:
if View.Name = 'Chart1' then
TfrChartView(View).AssignChart(your_Delphi_chart)
 
小弟英文学的不好,上面的意思是不是说fastreport可以引用delphi的chart对象
 
>>上面的意思是不是说fastreport可以引用delphi的chart对象
就是!试试吧[:)]
 
不行啊,TfrReport.OnBeforePrint中写“if View.Name = 'Chart1' then
TfrChartView(View).AssignChart(your_Delphi_chart) ”这句编译不过去的
 
能不能直接操作fastreport的chart对象画出多条线来
 
错误提示:NEED';'OR'END'HERE
 
to ty123,
不成功,老兄快帮帮忙阿
 
这个问题大家没碰到过吗?
 
找我吧,我自己写了dbchart for fastreport,基于chart6的源代码写的,可以加任意跟线,只要你愿意,要的话1000人民币吧呵呵,电话13607447489
 
我找到的,已试过可用,不用1000元了。
使用FastReport建立TChart/TDBChart非常容易,首先使用Delphi建立统计图表,然后在您的报表加入Chart元件,最後在TfrReport.OnBeforePrint事件指定統計图表至报表。參考如下:
-------------------
procedure TForm1.frReport1BeforePrint(Memo: TStringList;
View: TfrView);
begin
if View.Name = 'Chart1' then
begin
// 建立统计图
// 指定统计图給FastReport
TfrChartView(View).AssignChart(DBChart1);
end;
end;

---------------------
procedure TForm1.frReport1BeforePrint(Memo: TStringList;
View: TfrView);
begin
if View.Name = 'Chart1' then
begin
// 建立统计图
// 指定统计图給FastReport
TfrChartView(View).Assignto(DBChart1);
end;
end;

-------------------
procedure TForm1.frReport1BeforePrint(Memo: TStringList;
View: TfrView);
begin
if View.Name = 'Chart1' then
begin
// 建立统计图
// 指定统计图給FastReport
TfrChartView(View).Assignchart(DBChart1);
end;
end;

在uses 中加入fr_chart即可有assignChart属性
 
接受答案了.
 
后退
顶部