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

Вниз

кнопки SpeedButton   Найти похожие ветки 

← →
KSK   (2005-05-25 12:58) [0]

Есть на форме n-ое количество кнопок SpeedButton (SpeedButton1,..,SpeedButtonN) как програмно в одном цикле каждой 2-ой кнопке свойству DOWN присвоить значение TRUE (т.е. сделать их нажатыми)?

---

← →
Leonid   (2005-05-25 13:08) [1]

J:=0;
for I:=0 to ControlCount-1 do
 if Controls[I] is TSpeedButton then
 begin
 Inc(J);
  if Odd(J) then
    TSpeedButton(Controls[I]).Down:=true;
 end;

---

← →
KSK   (2005-05-25 16:42) [2]

> Leonid   (25.05.05 13:08) [1]

Дуже вдячний (большое спасибо)!!!

---

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

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

Наверх

Память: 0.46 MB
Время: 0.027 c