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

Вниз

Создал массив Трэк баров , подскажите как создать один   Найти похожие ветки 

 
smartleds   (2008-03-23 18:15) [0]

обработчик TrackBar1Change Который бы мог обрабатывать весь массив трэк баров.
Раньше я делал каждому трэкбару из массива , собственный обработчик,
но сейчас трэкбаров стало 512 штук , и очень неудобно писать для каждого свой обработчик.
Я планирую написать один обработчик , и в этом обработчике при помощи tag определять какой трэк бар используется и делать соответствующие действия.
Вот как объявлен и инициализирован массив трэк баров.

var   ArrOfTrackBar:array of Ttrackbar;
SetLength(ArrOfTrackBar,512);
ArrOfTrackBar[i]:=TTrackBar.Create(self);
ArrOfTrackBar[i].Parent:=Form1;
ArrOfTrackBar[i].Orientation:=trVertical;
ArrOfTrackBar[i].min:=0;
ArrOfTrackBar[i].max:=255;
ArrOfTrackBar[i].Position:=128;
ArrOfTrackBar[i].Width:=30;
ArrOfTrackBar[i].Height:=150;
ArrOfTrackBar[i].Left:=X2;
ArrOfTrackBar[i].Top:=Y2;
ArrOfTrackBar[i].Tag := i;
ArrOfTrackBar[i].OnChange := TrackBar1Change; Адрес обработчика OnChange


 
sniknik ©   (2008-03-23 18:25) [1]

вопрос решен
http://delphimaster.net/view/2-1206126773/
smartleds   (21.03.08 23:16) [2]
> Спасибо получилось!
незачем повторяться



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

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

Наверх




Память: 0.46 MB
Время: 0.015 c
2-1206603785
AlexeyMir
2008-03-27 10:43
2008.04.20
Locate,LocateNext в Interbase


11-1187883874
Vladimir Kladov
2007-08-23 19:44
2008.04.20
Объявление: новый модуль DecimalCalculations


15-1205124920
xVlad
2008-03-10 07:55
2008.04.20
Си в delphi


3-1196234534
Tronado
2007-11-28 10:22
2008.04.20
"Сквозной" поиск


2-1206524710
AlexeyMir
2008-03-26 12:45
2008.04.20
Модальная форма