Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.06.2009, 09:08   #1
cherry25
Форумчанин
 
Регистрация: 16.02.2009
Сообщений: 110
По умолчанию TChart или...?

Добрый день! Назрел такой вопрос. Никогда не работала с графиками в Delphi. Подскажите какой коспонент лучше использовать. Что мне нужно от графика:
1. Вывод графика на печать!!! (самое основное)
2. Если есть такая возможность, то хотелось бы отслеживать нажатие кнопки мыши на каждой точке кривой.
Спасибо за помощь!
cherry25 вне форума Ответить с цитированием
Старый 19.06.2009, 10:40   #2
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

TChart думаю достаточно
SERG1980 вне форума Ответить с цитированием
Старый 19.06.2009, 11:08   #3
cherry25
Форумчанин
 
Регистрация: 16.02.2009
Сообщений: 110
По умолчанию

Цитата:
Сообщение от SERG1980 Посмотреть сообщение
TChart думаю достаточно
Спасибо, а что Вы посоветуете по второму пункту? У меня только один вариант, буду создавать объекты под осью ОХ (в зависимости от кол-ва точек) и обрабаывать нажатия на эти компоненты.
И еще вопрос по первому п. Чтобы вывести график на печать он должен быть расположен единственным на форме? (Т.е. он печатается как принтскринт или можно с формы выбрать только график и распечатать?)
cherry25 вне форума Ответить с цитированием
Старый 19.06.2009, 11:53   #4
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

Попробуйте так, здесь показано как получить координаты серии в точке по клику мыши. Можете для себя переделать
Код:
procedure TForm1.Chart1ClickSeries(Sender: TCustomChart; Series: TChartSeries;
  ValueIndex: Integer; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
edit1.Text:=series.YValueToText(series.YValue[ValueIndex]);
edit2.Text:=series.YValueToText(series.XValue[ValueIndex]);
end;
а распечатать можно так
Код:
uses teeprevi;
......
chartpreview(form1,chart1);

Последний раз редактировалось SERG1980; 19.06.2009 в 11:55.
SERG1980 вне форума Ответить с цитированием
Старый 19.06.2009, 15:25   #5
cherry25
Форумчанин
 
Регистрация: 16.02.2009
Сообщений: 110
По умолчанию

спасибо, попробую так!
cherry25 вне форума Ответить с цитированием
Старый 24.06.2009, 10:27   #6
cherry25
Форумчанин
 
Регистрация: 16.02.2009
Сообщений: 110
По умолчанию

Спасибо, все работает. По ходу назрел еще такой вопрос, а можно ли сделать так, чтобы точки графика выделялись, были более жирные, чем линия, а то если линия не ломаная, то не видно саму точку, чтобы кликнуть на ней и можно попасть на предыдущую.
cherry25 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
TChart crit Компоненты Delphi 18 30.03.2011 17:51
вопрос по tchart xaero93 Помощь студентам 1 01.03.2009 10:10
TChart nataly60 Помощь студентам 1 06.06.2008 19:13
Tchart Droid Общие вопросы Delphi 9 27.05.2008 20:38
TChart и printer Albenous Общие вопросы Delphi 5 20.02.2007 09:42