手动滚动TComboBox

Question

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

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

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

Answer 1

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

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