Главная страница
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.022 c
1-43494
BKGG
2004-02-29 09:57
2004.03.14
рисунок (*.bmp) в Dll


1-43510
OlimPer
2004-02-28 21:22
2004.03.14
ListView


6-43734
Kacnep
2003-12-29 18:03
2004.03.14
Что то типа tracert


3-43249
Belkova
2004-02-13 12:03
2004.03.14
DBGrid


1-43623
Dina
2004-01-23 13:34
2004.03.14
На форме надо написать X в квадрате ( Двоечка вверху :) )