Форум: "Основная";
Текущий архив: 2005.06.14;
Скачать: [xml.tar.bz2];

Вниз

кнопки 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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.037 c