Работа с Chart-ом!

2»

Комментарии

  • отредактировано 22:17
    здравствуйте,
    подскажите, пожалуйста, как из кода обратиться к таким свойствам компонета TfrxChartView как Legend, BottomAxis?
  • отредактировано 22:17
    Извините за глупый вопрос, но как изменить толщину круговой диаграммы? И можно ли установить свои цвета кусков вместо стандартных? Версия FR 3.24
  • gpigpi
    отредактировано 22:17
    Толщина задаётся в Chart1.Chart.Chart3DPercent, цвет можно задавать в FR 4
  • отредактировано February 2011
    hi
  • отредактировано 22:17
    gpi написал: »
    Толщина задаётся в Chart1.Chart.Chart3DPercent, цвет можно задавать в FR 4

    Установил FR 4. Как в нем программно менять цвета секторов в pie chart, не подскажете?
  • gpigpi
    отредактировано 22:17
    Chart1.SeriesData.Items[0].Source3 := 'clRed;clYellow;clGreen';
  • отредактировано 22:17
    Chil написал: »
    В конечном итоге, перелопатив все, что было написано ранее, собрал рабочий вариант.

    uses
    frxClass, frxDBSet, frxChart, Printers, Series, ExtCtrls, Chart,
    frxDesgn, DBCtrlsEh, TeeProcs, TeEngine, Mask;

    var
    Page:TfrxReportPage;
    Chart:TfrxChartView;
    s: TChartSeries;
    Ser:TfrxSeriesItem;
    begin
    fr.Clear;
    Page := TfrxReportPage.Create(fr);
    Page.CreateUniqueName;
    Page.SetDefaults;
    Page.Orientation:=poLandScape;
    Chart := TfrxChartView.Create(Page);
    Chart.Align:=baClient;
    Chart.CreateUniqueName;
    s := TChartSeries(TLineSeries.NewInstance);
    s.Create(Chart);
    ser:=chart.SeriesData.Add;
    Chart.Chart.AddSeries(s);
    Chart.Chart.View3D:=false;
    with ser do
    begin
    DataType := dtFixedData;
    XSource := 'Jan;Feb;Mar;Apr';
    YSource := '31;28;30;25';
    end;
    fr.ShowReport;
    end;


    В этой процедуре проблема в том, что если серий больше 1 и разница максимальных значений в сериях существенная (хотя бы 30%), то график "плывет" и это заметно. Не знаю как бороться, графики вроде правильные, но вот значения под ними (некоторыми) меньше чем нужно. Может кто сталкивался?
  • отредактировано February 2011
    stanislove написал: »
    В этой процедуре проблема в том, что если серий больше 1 и разница максимальных значений в сериях существенная (хотя бы 30%), то график "плывет" и это заметно. Не знаю как бороться, графики вроде правильные, но вот значения под ними (некоторыми) меньше чем нужно. Может кто сталкивался?
    Прогнал. Нужно было дописать XType:=xtNumber; Но появилась проблема с наползанием друг на друга значений Х на оси.
    2e835075062eb52abffa991e59437513.jpg
  • отредактировано 22:17
    может кто подскажет...
    создаю программно серию: Chart1.Chart.AddSeries(TLineSeries.Create(nil));
    мне выводится график, но я не вижу на нем самих точек, просто линия
    как мне создать серию, чтобы это был линейный график с точками на нем???
  • gpigpi
    отредактировано 22:17
        Chart1.AddSeries(csLine);
         with Chart1.SeriesData[0] do
           begin
             DataType := dtFixedData;
             XSource := '1;2;3;4;5;6';
             YSource := '1;2;3;4;5;6';
           end;
    
  • отредактировано 22:17
    Кто-нибудь подскажите как в TeeChart задавать координату Z, если в качестве графика используется Surface?
    В Data указывается три координаты, но я нашел только процедуры AddX, AddY и AddXY. Как же тогда задавать координату Z программно?
    Или есть какие-то обходные пути?
  • отредактировано 22:17
    А как оно будет себя вести под ОС Windows 7?

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

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