|
Вопрос # 4 999/ вопрос решён / |
|
Доброго времени суток, уважаемые эксперты!
Я использую TDBChart и Series. У этой компаненты наверняка есть функция, возвращающая значение оси х при клике на мышь. Подскажите, как она называется и как ею воспользоваться.".
У меня есть код, который дает координаты курсора, у как сделать чтобы давал значение шкалы при клике мыши?
Приложение: Переключить в обычный режим- procedure TForm1.DBChart1Click(Sender: TObject);
- var
- xt,yt:double;
-
- begin
- DBChart1.MaxPointsPerPage:=0;
- Series1.GetCursorValues(xt,yt);
-
- label1.Caption:='X='+Series1.XValueToText(xt)+
- ' Y='+Series1.YValueToText(yt);
- end;
 |
Вопрос задал: vitalik32 (статус: Посетитель)
Вопрос отправлен: 4 февраля 2011, 09:46
Состояние вопроса: решён, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 1; последнее сообщение — 7 февраля 2011, 11:50; участников в обсуждении: 1.
|
|
vitalik32 (статус: Посетитель), 7 февраля 2011, 11:50 [#1]:
Вопрос решил. Кому интересно - код такой:
procedure TForm1.DBChart1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
tmpX, tmpY: Double;
begin
DBChart1.Series[0].GetCursorValues(tmpX,tmpY);
Label3.Caption:=Format('%10.2f',[TmpY]); // значение оси Y
Label4.Caption:=TimeToStr(TmpX); // значение оси Х
end;
|
7 февраля 2011, 11:50: Статус вопроса изменён на решённый (изменил автор вопроса — vitalik32)
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
