![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
scroll в chart
Мануха © (2007-08-02 21:50:00)Коллеги подскажите как?
в charte на правый маус можно скролить.А как мне прикрутить на чарт нормальный скроллбар,а то мышкой - убожество!
И как менять маштаб chart?
Мануха (2007-08-02 23:00:00) [1]собственно в демосах оказался есть пример :0 так что проблема снимается)
Мануха (2007-08-02 22:35:00) [2]типо того...
Procedure TForm1.ScrollAxis(Axis:TChartAxis; Const Percent:Double);
var Amount:Double;
begin
With Axis do
begin
Amount:=-((Maximum-Minimum)/(100.0/Percent));
SetMinMax(Minimum-Amount,Maximum-Amount);
end;
end;
Procedure TForm1.HorizScroll(Const Percent:Double);
begin
ScrollAxis(Chart1.TopAxis,Percent);
ScrollAxis(Chart1.BottomAxis,Percent);
end;
осталось на scrollbar повесить
Мануха (2007-08-02 22:25:00) [3]хм...похоже зум тут не покатит, лучше если бы можно было задавать кол-во
поинтов по X
JanMihail (2007-08-02 22:19:00) [4]
> не, у меня гистограмма :)
Ну попробуй. Должно и в ней поканать!
Мануха (2007-08-02 22:13:00) [5]не, у меня гистограмма :)
JanMihail (2007-08-02 22:12:00) [6]
> И как менять маштаб chart?
В круговой диаграмме так
with Series1.ParentChart.View3DOptions do
begin
Zoom := Zoom + 60;//Увеличение
Zoom := Zoom - 60;//Уменьшение
end;