手动滚动TComboBox

Question

当我以编程方式导致下拉选择列表出现时，我无法弄清楚为什么我无法手动滚动TComboBox组件。这是我正在使用的代码：

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

这会导致下拉选择列表出现。但是，如果我尝试使用键盘并使用向上和向下箭头键，则下拉选择列表会立即关闭。使用键盘上/下导航键时如何使列表不自动关闭？

Answer 1

激活ComboBox。并且您最好使用DroppedDown属性，这也会使组合框无效以反映更改。

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