Запрет ввода текста в TComboBox

← →
3asys (2003-01-14 15:31) [0]

Как максимально просто запретить ручной ввод текста в TComboBox, сохранив возможность выбирать из имеющихся значений?

С Уважением, 3asys

← →
MBo © (2003-01-14 15:40) [1]

стиль csDropDownList

← →
Skier © (2003-01-14 15:40) [2]

>3asys
TComboBox := csDropDownList ?

← →
Chubais © (2003-01-14 15:47) [3]

стиль csOwnerDrawFixed

← →
3asys (2003-01-14 15:52) [4]

стиль csDropDown
Дело в том, что я программно генерирую список вариантов и при csDropDownList при создании формы в ComboBox - пустое поле, которое исчезает после выбора первого же варианта, а при csDropDown, ComboBox сразу устанавливается на первый вариант (чтот мне и нужно). Программно выставить его при стиле csDropDownList на первый вариант: ComboBox1.Text:=ComboBox1.Items[0]
не удается - все равно при загрузке высвечивается пустое поле (которого я не создавал).

Как можно запретить редактирование в режиме csDropDown ?

С Уважением, 3asys

← →
3asys (2003-01-14 15:54) [5]

с режимом csOwnerDrawFixed - та же проблема, что и с csDropDownList

С Уважением, 3asys

← →
Skier © (2003-01-14 15:55) [6]

ComboBox1.ItemIndex := 0;

← →
neXt © (2003-01-14 15:57) [7]

ну завернул!
это так стиль установить
ComboBox1.Style := csDropDownList;
а так сделать чтоб ни один из элементов выбран не был
ComboBox1.ItemIndex := -1;

← →
neXt © (2003-01-14 15:58) [8]

ComboBox1.ItemIndex := 0;
а это установить на первый вариант

← →
3asys (2003-01-14 16:06) [9]

СПАСИБО БОЛЬШОЕ ВСЕМ!

С Уважением, 3asys

блин как ты форму ваще умудрился создать, я вот удивляюсь....

Для компонентов а-ля TComboBox, если по каким-то причинам не работает ComboBox1.ItemIndex := n (например в случае с TDBLookUpComboBox) можно использовать следующую строку:
TDBLookUpComboBox.Perform(WM_KEYDOWN, 38) - работает всегда

Запрет ввода текста в TComboBox Найти похожие ветки