Fastreport --> Chart

DizeL

Приветствую всех!

Создал отчет в котором присутстует МастерДата (тип одна строка), на котором расположено несколько "Мемо" с данными от динамических переменных и собственно Диаграмма на которой должны отображаться:
x-Имена переменных
y-Значения переменных.

Пробую выставлять источником данных "Фиксированные данные", присваиваю:

x- A
y- <all_count>

При просмотре Fastreport выдает ошибку:

написал:

"floating point"

Как все осуществить ?

DizeL

А в ответ ТИШИНА ...

-=Den=-

При выборе Fixed data разбор выражений не осуществляется.

DizeL

написал:

При выборе Fixed data разбор выражений не осуществляется.

Что же можно придумать ?

Надо вывести график из 4 переменных !

-=Den=-

написал:

Что же можно придумать ?

Устанавливать из скрипта или из программы.

DizeL

написал:

написал:

Что же можно придумать ?

Устанавливать из скрипта или из программы.

Приветствую -=Den=-!

Вижу ты настарался в предыдущих топиках, рассказывая как создавать свой Chart.

Вот мой отчет с проблемными переменными z,m,n:

var
 Page:TfrxReportPage;
 Chart:TfrxChartView;
 s: TChartSeries;
 Ser,:TfrxSeriesItem;
 z,n,m:String;
begin
  z:='10';
  n:='20';
  m:='30';
frxReport.Clear;
Page := TfrxReportPage.Create(frxReport);
Page.CreateUniqueName;
Page.SetDefaults;
Page.Orientation:=poLandScape;
Chart := TfrxChartView.Create(Page);
Chart.Align:=baClient;
Chart.CreateUniqueName;
s := TChartSeries(TPieSeries.NewInstance);
s.Create(Chart);
ser:=chart.SeriesData.Add;
Chart.Chart.AddSeries(s);
Chart.Chart.View3D:=false;
//--------------------------------
with ser do
begin
DataType := dtFixedData;
XSource := 'Z;N:M';
YSource := z,n,m;  // КАК ЗДЕСЬ СДЕЛАТЬ ???
end;
//---------------------------------
frxReport.ShowReport;
end;

У мееня получаеться присвоить YSource только одно значение YSource := z , может надо добавлять серии, но в топиках я так и ненашел как в Chart-е добавить свои серии (может плохо смотрел?)


Если знаеш помоги!

-=Den=-

Там тоже должна быть строка, попробуй так YSource := IntToStr(z)+';'+IntToStr(n)+';'+IntToStr(m);

написал:

может надо добавлять серии, но в топиках я так и ненашел как в Chart-е добавить свои серии (может плохо смотрел?)

Вот этот код добавляет сериию

s := TChartSeries(TPieSeries.NewInstance);
s.Create(Chart);
ser:=chart.SeriesData.Add;
Chart.Chart.AddSeries(s);
Chart.Chart.View3D:=false;

DizeL

написал:

написал:

Там тоже должна быть строка, попробуй так YSource := IntToStr(z)+';'+IntToStr(n)+';'+IntToStr(m);

Получилось так:

 YSource := z+';'+n+';'+m;

ОГРОМНОЕ ТЕБЕ СПАСИБО !!!