请大家帮忙!谢谢!

解决方案 »

  1.   

    在 KeyPress 事件中
    if Key = #13 then
    begin
    //你的代码
    end;
      

  2.   

    // 在keydown事件中也可以
    procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
        if key=13 then showmessage('按了回车');
    end;
      

  3.   

    procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
      if Key = VK_RETURN then
        ShowMessage('yeah');
    end;
      

  4.   

    都说啦!
    Enter键的十进制值为13
    只要你进行判断就行了
      

  5.   

    if Key = #13 then
    begin
      回车后需要执行的代码
    end;