Ручная прокрутка через TComboBox

Question

Я не смог понять, почему я не могу вручную прокручивать компонент TComboBox, когда я программно выставляю список выпадающего списка. Вот код, который я использую:

SendMessage(ComboBox1.handle, CB_SHOWDROPDOWN, Integer(True), 0); 

Это приводит к появлению списка выпадающего списка. Однако, если я попытаюсь использовать свою клавиатуру и использовать клавиши со стрелками вверх и вниз, список выпадающего списка сразу же закрывается. Как сохранить список с автоматическим закрытием при использовании клавиш навигации вверх/вниз?

Answer 1

Активировать ComboBox. И вам лучше использовать свойство DroppedDown, что также делает недействительным значение combobox для отражения изменений.

ActiveControl := ComboBox1; 
ComboBox1.DroppedDown := True;