手動滾動TComboBox

Question

我無法弄清楚為什么我以編程方式導致出現下拉選擇列表時無法手動滾動TComboBox組件。 這是我正在使用的代碼：

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

這將導致下拉選擇列表出現。 但是，如果嘗試使用鍵盤並使用向上和向下箭頭鍵，則下拉選擇列表將立即關閉。 使用鍵盤上/下導航鍵時如何防止列表自動關閉？

Answer 1

激活組合框。 並且最好使用DroppedDown屬性，該屬性還會使組合框無效以反映更改。

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