Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как окрасить TChartSeries?


Страницы:   1 2

Углук ©   (2007-03-30 20:13:00) 

В Runtime добавляю к TChartSeries значения:
Такой вариант работает:


       fChannelA.AddXY((i div 2)-1,-DBMean);
        fChannelA.ValueColor[(i div 2)-1]:=ClWhite;


Но затем мне понадобилось добавлять не все  подряд значения:


if (-DbMean>-DbMeanext) then begin
       inc(n);
       fChannelA.AddXY((i div 2)-1,-DBMean);
        fChannelA.ValueColor[n]:=ClWhite;
      end;

Такой вариант не работает, т.е. линии значений
окрашиваются в произвольные цвета ( такой же эффект возникает, если ничeго не присваивать          fChannelA.ValueColor
Как правильно закрасить все значения в белый цвет?


ewpsg   (2007-05-19 10:10:00) [1]

<a href=  ></a>   [url=][/url]


Kolan   (2007-04-16 18:49:00) [2]

> Спасибо :-)

Да всегда пожалуйста…


_Аноним   (2007-04-16 18:45:00) [3]

Тоже столкнулся приблизительно с этим же геморроем.
Ваш вариант не прокатил, но тем не менее проблема после решения ветки разрешилась.

> Kolan ©  

Спасибо :-)


Kolan   (2007-04-13 21:55:00) [4]

> Задача не требует смены цвета


> Как окрасить TChartSeries?

А чего же она требует???


Углук   (2007-04-13 18:26:00) [5]

Задача не требует смены цвета


Kolan   (2007-04-04 21:34:00) [6]

>  fChannelA.AddXY((i div 2)-1,-DBMean,'',clWhite);

Так чтож теперь если цвет надо поменять будешь все заново рисоват? — :(


Углук   (2007-04-03 20:41:00) [7]

Ура!
Сработало       fChannelA.AddXY((i div 2)-1,-DBMean,'',clWhite);

Спасибо!


Kolan   (2007-04-03 20:37:00) [8]

> fChannelA.SeriesColor содержит $FFFF

А если окно задвинуть за край экрана и назад вернуть(перерисовать короче) ?


Kolan   (2007-04-03 20:32:00) [9]

> Да, попадает, проверил.

И цвет не меняется? А попробуй другое свойство.
Обяви
FChannelA       : TChartSeries; //
FChannelB       : TChartSeries; //
TLineSeries (незабудь добавить Series в uses)

И включай свойство :
Stairs
Например.


Углук   (2007-04-03 20:28:00) [10]


> Может быть ты еще гдето цвет меняешь

Уже в момент прихода отладчиком на строку

 fChannelA.SeriesColor:=clWhite;


Поле   fChannelA.SeriesColor содержит $FFFF, так что это скорее всего тот самый  0,001%


Kolan   (2007-04-03 20:25:00) [11]

> Да, попадает, проверил.

Может быть ты еще гдето цвет меняешь? Может fChannelA невидна, а видна только ChannelB — вариантов масса. И на 99.999% виноват ты а не чарт.


Углук   (2007-04-03 20:25:00) [12]

К сожалению, там до черта сторонних компонент :) Так что скорее всего я выкину чарт и буду рисовать на канвасе. Спасибо за труд!


Kolan   (2007-04-03 20:24:00) [13]

> пришло

пришл и


Kolan   (2007-04-03 20:23:00) [14]

Хочешь пришло проект я отлажу. Только у меня нет никаких сторонних компонентов и ставить их я не хочу.  :)


Углук   (2007-04-03 20:23:00) [15]

Да, попадает, проверил.


Kolan   (2007-04-03 20:21:00) [16]

> ChannelB: TLineSeries;
> ChannelA: TLineSeries;


Ну вот с этим разобрались.

 if —DBMean>-DBMeanext then
    begin
     inc(n);
     fChannelA.SeriesColor:=clWhite;
     fChannelA.AddXY(n,-DBMean);
   end;


А точно на fChannelA.SeriesColor:=clWhite;попадает? Проверял отладчиком?


Углук   (2007-04-03 20:19:00) [17]

Я ацки туп :)


Углук   (2007-04-03 20:18:00) [18]

Нашел:)
В объявлении формы
 ChannelB: TLineSeries;
 ChannelA: TLineSeries;


Kolan   (2007-04-03 20:14:00) [19]

> Error: Undeclared identifier 'TLineSeries'

Series где?


Kolan   (2007-04-03 20:12:00) [20]

Так. Тут показана что они передаются. Те они уже созданы ВНЕ create.
Так кто же их создает? В дизан тайме они создаются? Тогда это НЕ TChartSeries так как в дизанере нет таких.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо