Работа с Tfrxchartview в скрипте

veracruz · August 2010

Здравствуйте.
Просмотрел весь форум по данной тематике, но решение для себя так и не нашел.
Мне нужно в скрипте для существующего на странице <Chart1: TfrxChartView>
динамически добавить серию типа <TLineSeries> и указать для этой серии
источник данных типа <TfrxADOQuery> с его двумя полями.
Покажите пожалуйста пример скрипта для такой ситуации, буду Вам очень благодарен,
да и не только я. Наверняка у Вас есть какие-нибудь старые примеры.
Для работы использую <FastReport 4.9.100> и <TeeChart Pro 8.0.6>.
Ответьте пожалуйста.

gpi · August 2010

Chart1.AddSeries(csLine);
     with Chart1.SeriesData[0] do
       begin
         DataType := dtDBData;
         DataSet := ADOQuery1;                                                               
         XSource := 'ADOQuery1."X"';
         YSource := 'ADOQuery1."Y"';
       end;

veracruz · August 2010

Благодарю, ничего лишнего, все лаконично и просто. Респект Вам.

veracruz · August 2010

gpi написал: »

Chart1.AddSeries(csLine);
     with Chart1.SeriesData[0] do
       begin
         DataType := dtDBData;
         DataSet := ADOQuery1;                                                               
         XSource := 'ADOQuery1."X"';
         YSource := 'ADOQuery1."Y"';
       end;

Подскажите пожалуйста одну тонкость. Вышеприведенный код работает только для заранее созданного в вкладке "ДАННЫЕ"
объекта <ADOQuery1>. А если мне в скрипте необходимо динамически создать N объектов для N серий, то это уже не работает.
Ну может и работает, только я не знаю как зарегистрировать в скрипте очередной <ADOQuery1>.
Что-нибудь типа:

var
q: TfrxADOQuery;
begin
q := TfrxADOQuery.Create(nil);
q.DataBase := ....;
q.SQL.Add('......');
............
Как зарегить динамически созданный объект?
............
Chart1.AddSeries(csLine);
with Chart1.SeriesData[0] do
begin
DataType := dtDBData;
DataSet := q;
XSource := 'q."Field1"';
YSource := 'q."Field2"';
end;
.............

end;

Работа с Tfrxchartview в скрипте

Комментарии

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