Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.14;
Скачать: CL | DM;

Вниз

Работа с Chart , можно ли вычислить значение   Найти похожие ветки 

 
aha   (2004-02-29 15:26) [0]

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


 
тихий вовочка ©   (2004-02-29 16:04) [1]

procedure TForm1.Chart1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);

var p : TPoint;
a,b : real;
begin
GetCursorPos(p);
a:=Series1.XScreenToValue(X);
b:=Series1.YScreenToValue(Y);

ShowMessage(FloatToStr(a)+" "+FloatToStr(b));
end;


 
aha   (2004-02-29 16:15) [2]

это же не совсем то .. мне то нужно щелкнуть предположим мышкой по любому месту по оси Х и чтобы по кривой можно было вычислить значение функции...


 
тихий вовочка ©   (2004-02-29 18:29) [3]

Тогда попробуй
a:=Round(Series1.XScreenToValue(X));
ShowMessage(FloatToStr(Series1.YValues[a]));


 
aha   (2004-02-29 19:35) [4]

.. спасибо , было бы хорошо , если тока у меня целые числа а , у меня они дробные .. другого варианта похоже нет ?



Страницы: 1 вся ветка

Текущий архив: 2004.03.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
1-43632
Creator
2004-03-02 13:36
2004.03.14
Сервисы


1-43500
Vilux
2004-02-18 16:30
2004.03.14
Как узнать, что программа будет закрыта, если нет формы


14-43785
zamkom
2004-02-18 16:36
2004.03.14
Не работает поиск.


14-43820
Alex Konshin
2004-02-21 23:10
2004.03.14
Средний класс в Америке


4-43948
Duke DEE
2004-01-04 14:48
2004.03.14
Как изменить текст Tedit в чужом окне?