cxDBComboBox cxDBPopupEdit 的
KeyDown事件下写如下代码即可:
cxDBComboBox :
procedure myfrm.cxDBComboBoxKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
inherited;
if key=VK_DOWN then (Sender as TcxDBComboBox).DroppedDown:=True;
end;
cxDBPopupEdit :
procedure myfrm.cxDBPopupEditKeyDown(Sender: TObject;
var Key: Word; Shift: TShiftState);
begin
inherited;
if key=VK_DOWN then (Sender as TcxDBPopupEdit).DroppedDown:=True;
end;