在onkeydown事件里procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if key=VK_RETURN then form1.ComboBox1DropDown(sender); end;
在onkeydown里procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if key=13 then showmessage('you are good'); end;
procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if key=#13 then showmessage('ddddddd'); end;
Shift: TShiftState);
begin
if key=VK_RETURN then
form1.ComboBox1DropDown(sender);
end;
Shift: TShiftState);
begin
if key=13 then
showmessage('you are good');
end;
Shift: TShiftState);
begin
if key=#13 then
showmessage('ddddddd');
end;