Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

График [D7, Win2k]

Explorer © (2002-11-28 14:46:00)
Мастера!

Как нарисовать какой-нибудь график (x, y), чтобы можно было менять несколько точек на этом графике и он перересовывался, а так же цвет линий и т.д.?

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

Explorer (2002-12-03 11:05:00) [1]
>Наезжалкин

Попытаюсь!

Наезжалкин (2002-12-03 10:44:00) [2]
Лучше ничего не читай, хорошенько отдохни, и потом, со свежей головой, напиши класс, который способен хранить данные точек и выводить их на указанный Canvas по требованию. Готовый рецепт и чужая "простыня" кода не всегда лучший выход...

Explorer (2002-12-03 10:38:00) [3]
>KoluChi ©
Да я бы с удовольствием! Вот только, не могу инфы никакой найти.
По TChart нашел, а вот рисование на канве..:((
Сейчас еще поищу. Спасибо!

KoluChi (2002-12-03 09:27:00) [4]
Насчет TChart"а: отлавливать события мыши и изменять данные у кривой.
Но TChart не есть очень хорошо - много не нужного, к тому же не очень красиво (дело вкуса). Я согласент с MBo, что лучше будет рисовать самому:
1. Не так это сложно.
2. Все-таки опыт.
3. Должно получиться более красиво и рисоваться должно быстрее(если все правильно сделать).

Explorer (2002-12-03 08:52:00) [5]
Ни кто с этим не сталкивался?

Explorer (2002-12-02 10:20:00) [6]
>Axis_of_Evil ©

Это мне понятно. А вот, как например, можно изменить полученный график, при помощи мыши (потянуть график вниз, вверх и т.д.)?

Axis_of_Evil (2002-12-02 09:18:00) [7]
По заданным точкам: f(x) = ...
Дважды кликни на Chart1 в режиме конструирования
|
создай серию (график - линия)
x: Integer; |
for x := 1 to 100 do
Chart1.SeriesList[0].AddXY(x, f(x), "a", ClRed);
или
x: Real;
x := 0.0;
while (x <= 100.0) do
begin
Chart1.SeriesList[0].AddXY(x, f(x), "a", ClRed);
x := x + 0.1;
end;

где f(x) - функция, или выражение, пример:
...
Chart1.SeriesList[0].AddXY(x, x*x + exp(x), "a", ClRed);
...

или

real function f(x: Real);
begin
Result := x*x + exp(x);
end;

...
Chart1.SeriesList[0].AddXY(x, f(x), "a", ClRed);
...

Explorer (2002-12-02 07:50:00) [8]
Покопался немного в TCHART.

Подскажите, а можно реализовать при помощи этой компоненты, такую задачку:

построить график по заданным точкам (которые пользователь может потом изменить!), выделив на графике эти точки и при помощи мыши изменять координаты этих точек.

Если при с помощью TChart нельзя воплотить, то как ВООБЩЕ это можно сделать?

Андрей Сенченко (2002-11-29 12:43:00) [9]
Explorer © (29.11.02 12:33)
А где про это можно почитать?

1. Безусловно в книжках.
2. Безусловно в хелпе.
3. Можно : пошукать по форуму
4. Можно : пошукать по FAQ

LongIsland (2002-11-29 12:37:00) [10]
Если никогда не делал, то лучше используй TChart. Пример в Demo к Delphi

Explorer (2002-11-29 12:33:00) [11]
А где про это можно почитать?

MBo (2002-11-28 14:50:00) [12]
Сам рисуй на Canvas или используй TChart

Наверх

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