Главная страница
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.012 c
3-1196103500
Kley
2007-11-26 21:58
2008.04.20
подсчет стажа


2-1206774938
Ramzes001
2008-03-29 10:15
2008.04.20
Проблема в работе StrPCopy


2-1206708622
asdf2
2008-03-28 15:50
2008.04.20
DataSet


15-1204908345
@!!ex
2008-03-07 19:45
2008.04.20
Комп не грузится


2-1206540539
Rus
2008-03-26 17:08
2008.04.20
Помогите раскрыть двоичный файл