我想在Tcombobox中按下回车键的时候执行程序,该在哪里写?

解决方案 »

  1.   

    在onkeydown事件里procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
    if key=VK_RETURN then
       form1.ComboBox1DropDown(sender);
    end;
      

  2.   

    在onkeydown里procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
    if key=13 then
       showmessage('you are good');
    end;
      

  3.   

    procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
    if key=#13 then
       showmessage('ddddddd');
    end;