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

Приствоить тест ComboBox в OnChange   Найти похожие ветки 

← →
Дмитрий_177   (2006-02-05 22:20) [0]

Столкнулся с такой проблемой в событии OnChange у ComboBox нужно проверить одно условие, и если оно выполняется то присвоить ComboBox.Text другое значение, независимо от того которое выбрал пользователь. Делаю так:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if <условие> then
 ComboBox1.Text := "1"; // к примеру
end;

так вот всеравно ComboBox отображает то что выбрал пользователь в любом случаее..

---

← →
Defunct ©   (2006-02-06 02:44) [1]

"Следствие - если твоя пpогpамма выполняет мистические действия, значит, ты сделал что-то невеpоятно тyпое." (C) законы Мерфи.

---

← →
VIB ©   (2006-02-06 03:19) [2]

меняй не Text, а ItemIndex

---

← →
icWasya ©   (2006-02-06 15:58) [3]

тут ещё может быть понадобится поставить проверку на рекурсию

---

← →
antonn ©   (2006-02-06 19:42) [4]

> procedure TForm1.ComboBox1Change(Sender: TObject);

а в OnClick?

---

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

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



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