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

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

TChart [D7, XP]


Shementov ©   (2008-08-05 00:37:00) 

Привет
У меня на форме расположены TChart,TeeComander и Button. TeeComander связан с TChart. Ниже указанный код записан на событие Button.onClick:

Chart1.RemoveAllSeries;
 Chart1.AddSeries(TLineSeries.Create( Self ));
 Chart1.AddSeries(TLineSeries.Create( Self ));
   Chart1.AddSeries(TLineSeries.Create( Self ));

Chart1.Series[0].FillSampleValues(25);
Chart1.Series[1].FillSampleValues(25);

Chart1.Series[2].SetFunction(TCrossPointsFunction.Create(Self));

Chart1.Series[2].DataSource:=Chart1.Series[0];
Chart1.Series[2].DataSource:=Chart1.Series[1];

Т.е. я хочу получить следующее:
при нажатии на Button, на Chart-е должны создаться и отобразиться две произвольные пересекающиеся кривые (Chart1.Series[0] и Chart1.Series[1]), и третья кривая (Chart1.Series[2]), которая должна соединять точки пересечений двух первых кривых (Chart1.Series[0] и Chart1.Series[1]).

Вот что происходит сейчас при нажатии на Button(если на событие Button.onClick записан выше указанный код):
на Charte отображаются две пересекающиеся, в нескольких местах, кривые(Series1 и Series2). Третья кривая(Series3), создается но не отображается (т.е. Series3 не находит точек пересечения).

В попытке понять в чем дело, увидел следующее:
в TeeComander-e (во время работы моего нехитрого приложения) нажимаю на ChartEditing и выбираю Series3. На закладке DataSource, в окошке available отображается Series1, а окошке Sellected отображается Series2. Получается, что Series3 использует данные последнего, прописанного в обработчике Button.onClick Series-а (в данном случае Series2)
Но мне то нужно, чтоб оба Series-а (Series1 и Series2) находились в окошке Sellected, т.е. чтоб Series3 использовал данные и Series1 и Series2.
С помощью Математики находить точку пересечения не хочу ... это реально сделать с помощью TCrossPointsFunction.
Заранее благодарен за ответ


Amoeba   (2008-08-05 01:00:00) [1]


> С помощью Математики находить точку пересечения не хочу
> ...

А ведь придется. Иначе будешь иметь то, что имеешь (т.е. что за тебя "дядя из Borland'а напортачил").


Наверх

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