Скачать: CL | DM;

Очистить все TComboBox на форме   Найти похожие ветки 

← →
worldmen   (2010-06-23 12:23) [0]

На форме (TabSheet2) есть 30 TComboBox. После того, как они заполняются, мне их надо очистить, т.е. свойство
TComboBox.ItemIndex= -1
Я понимаю что как-то через это:
(Sender as TComboBox).ItemIndex:=-1;
А чего еще не хватает?

---

← →
oldman ©   (2010-06-23 12:29) [1]

> А чего еще не хватает?


Цикла, наверное.

---

← →
Leonid Troyanovsky ©   (2010-06-23 12:33) [2]

> worldmen   (23.06.10 12:23)  

> (Sender as TComboBox).ItemIndex:=-1;


 with TabSheet2 do
   for i := 0 to ControlCount-1 do
     if (Controls[i] is TComboBox) then
       TComboBox(Controls[i]).Clear;

--
Regards, LVT.

---

← →
KilkennyCat ©   (2010-06-23 12:57) [3]

> Leonid Troyanovsky ©   (23.06.10 12:33) [2]

злыдень, а вдруг он имел ввиду только видимый текст? :)

---

← →
Leonid Troyanovsky ©   (2010-06-23 13:07) [4]

> KilkennyCat ©   (23.06.10 12:57) [3]

> злыдень, а вдруг он имел ввиду только видимый текст? :)

Ну, там выберет, что по вкусу.

--
Regards, LVT.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c