Ошибка, не могу присвоить серию диаграмме "Несовместимые типы 'tcustomaxispanel','t

отредактировано 01:30 Раздел: FastReport 4.0
Здравствуйте,
FastReport - хороший генератор отчётов, но в отношении работы с диаграммами из кода, мне кажется, в нём это плохо реализовано.
Если кто-нибудь в этом разубедит, буду очень рад.
Долгое время не получалось создать рабочую серию в диаграмме из кода, но вроде бы удалось сделать код, похожий на рабочий. Теперь осталось только присвоить серию Chart-у, лежащему на отдельной странице, и тут ничего не могу сделать. В интернете в Delphi везде это делается легко:
myseria.ParentChart:=Chart1;
а здесь, в FastReport, выдаёт ошибку "Несовместимые типы 'TCustomAxisPanel','TfrxChartView'"

ParentChart : TCustomAxisPanel

свою версию FastReport не знаю и узнать не получилось, он стоит на предприятии, похоже эта информация тут недоступна, но думаю версия не новая.
Код у меня такой:

s := TBarSeries.Create(Chart5);
s.Name:='OTA';
s.ParentChart := Chart5 //эта строчка выводит ошибку
s.DataSource:=Query31;
s.XLabelsSource:='Query31."work"';
s.YValues.ValueSource:='Query31."cnt_order_ota"';
s.Active:=true;

подскажите пожалуйста чего мне не хватает, интернет уже весь излазил.

Комментарии

  • gpigpi
    отредактировано 01:30
    Начиная с версии 4.8 или 4.9, серии в скрипте можно добавлять так:
    In report script use:
    begin
         Chart1.AddSeries(csBar);
         with Chart1.SeriesData[0] do
           begin
             DataType := dtFixedData;
             XSource := '1;2;3;4;5;6';
             YSource := '1;2;3;4;5;6';
           end;
    end.
    
    Chart1.AddSeries(csBar);
         with Chart1.SeriesData[0] do
           begin
             DataType := dtDBData;
             DataSet := ADOTAble1;                                                               
             XSource := 'ADOTable1."CustNo"';
             YSource := 'ADOTable1."Company"';
           end;
    
    Номер версии FR можно посмотреть в дизайнере
  • отредактировано 01:30
    gpi, благодарю за ответ,
    мне здесь помощь очень нужна и любой ответ обнадёживает

    Может у меня более ранняя версия, потому что
    ...
    s: TBarSeries;
    begin
    s := TBarSeries.Create(Chart5);
    s.Name:='OTA';
    Chart5.AddSeries(s); //эта команда не работает
    s.DataSource:=Query31;
    s.XLabelsSource:='Query31."work"';
    s.YValues.ValueSource:='Query31."cnt_order_ota"';
    s.Active:=true;
    ...
    end

    эта команда Chart5.AddSeries(s); почему-то не работает
    подскажите пожалуйста где в дизайнере можно увидеть версию FastReport-а?
    там есть в главном меню такой пункт "?", но при нажатии ничего не показывается
  • отредактировано 01:30
    serge написал: »
    подскажите пожалуйста где в дизайнере можно увидеть версию FastReport-а?
    там есть в главном меню такой пункт "?", но при нажатии ничего не показывается

    Кажется нашёл, в свойствах объекта TfrxReport, version 4.6.8
    Наверно в ней серию не добавишь?
  • gpigpi
    отредактировано 01:30
    Обновите FR. В более ранних версиях возможности добавления серий в скрипте не было
  • отредактировано 01:30
    gpi написал: »
    Обновите FR. В более ранних версиях возможности добавления серий в скрипте не было

    Спасибо большое за помощь!

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.