Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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;


Наверх

Титульная страница Поиск, карта сайта Написать письмо