如何在TDbLookupComboBox上敲个回车后自动显示下拉选择框?

Question

up

Answer 1

TComboBox可以设置DropDowned:=True;
但我用TDbLookupComboBox.DropDown不行呀

Answer 2

在OnKeyPress事件中,判断是否按了回车键,
如果是,就用SendMessage向DBLookupComboBox1的handle发送下拉的消息

Answer 3

SendMessage(DBLookupComboBox1.Handle, CB_SHOWDROPDOWN, 1, 0);

Answer 4

procedure TForm1.DBLookupComboBox1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
PostMessage(DBLookupComboBox1.Handle, CB_SHOWDROPDOWN, 1, 0);
end;