Создание объекта из кода
Здравствуйте, все!
Раньше стоял FR2.4. С помощью него я создавал объект (TfrChartView) и присваивал ему изображение имеющегося на форме графика (Chart) следующим образом:
TfrChartView ReportChart;
TfrPage Page=frReport.Pages.Pages[0];
ReportChart=frCreateObject(gtAddIn,"TfrChartView");
ReportChart.AssignChart(Chart);
Page.Objects.Add(ReportChart);
Поставил FR3 - такая фича не проходит, менял типы на Tfrx вместо Tfr.
Короче написал так:
TfrxChartView ReportChart;
TfrxPage Page=frReport.Pages[0];
ReportChart=frCreateObject(gtAddIn,"TfrxChartView");
ReportChart.AssignChart(Chart);
Page.Objects.Add(ReportChart);
А она ругается на функцию frCreateObject.
Чего я только не пробовал...... Все равно ругается.
Может кто подскажет. как в FR3 правильно созавать объекты в отчете?
С уважением.
Раньше стоял FR2.4. С помощью него я создавал объект (TfrChartView) и присваивал ему изображение имеющегося на форме графика (Chart) следующим образом:
TfrChartView ReportChart;
TfrPage Page=frReport.Pages.Pages[0];
ReportChart=frCreateObject(gtAddIn,"TfrChartView");
ReportChart.AssignChart(Chart);
Page.Objects.Add(ReportChart);
Поставил FR3 - такая фича не проходит, менял типы на Tfrx вместо Tfr.
Короче написал так:
TfrxChartView ReportChart;
TfrxPage Page=frReport.Pages[0];
ReportChart=frCreateObject(gtAddIn,"TfrxChartView");
ReportChart.AssignChart(Chart);
Page.Objects.Add(ReportChart);
А она ругается на функцию frCreateObject.
Чего я только не пробовал...... Все равно ругается.
Может кто подскажет. как в FR3 правильно созавать объекты в отчете?
С уважением.
Комментарии
ReportChart.Create(Page);
Пробую создать Series следующим образом:
Series=ReportChart.SeriesData.Add();
Series.DataSet=frxDBDataset; /*frxDBDataset находится на форме*/
А он ругается, что "List index out of bounds (0)"????????
Как быть?
var
Chart: TfrxChartView;
Series: TfrxSeriesItem;
begin
Chart := TfrxChartView.Create(Page);
Chart.Chart.AddSeries(TLineSeries.Create(Chart.Chart));
Series := Chart.SeriesData.Add;
TfrChartView.AssignChart(TChart);
в FR3 пробую:
TfrxChartView.Chart.Assign(TChart);
че то не работает, остается пустой график.
Может че не так делаю?
TfrxtChartView->Chart->BottomAxis->DateTimeFormat="dd/mm/yy";
А он все равно выводит дату в виде "dd/mm/yy hh:mm:ss"
Пишу скрипт С++:
double LeftAxisMinimum=Chart32.Chart.MinYValue(Chart32.Chart.LeftAxis);
А он ругается 'Undeclared MinYValue'
A: Это лучше всего сделать с помощью объекта TfrxPictureView. Поместите пустой
объект в отчет и в TfrxReport.OnBeforePrint напишите:
procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent);
begin
if Sender.Name = 'Picture1' then
TfrxPictureView(Sender).Picture.Assign(
Chart1.TeeCreateMetafile(False,
Rect(0, 0, Round(Sender.Width), Round(Sender.Height))));
end;
Получается, что из скрипта можно работать только со published свойствами, а published методы недоступны. Так ли это???