Очистить все 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]

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

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

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

--
Regards, LVT.

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