edit小问题

如何实现在edit中输入文字后按回车，交点跳到下一个edit  

解决方案 »

  1.   

    晕随便找找就有一大堆，在KEYPRESS之类的事件中加一个判断是不是回车的函数，如果是就移动到下一个控件（方法有几种，模拟按键，还有一个函数好像可以直接移到一下个控件），网上搜一下，有一大堆了
      

  2.   

    下面的代码可以达到这种效果
    procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
        if key=VK_RETURN then Edit2.SetFocus;
    end;
      

  3.   

    上面的方法可以，还有，你可以用Enter来代替Tab，这样的效果多的是，你在CSDN上搜索一下就一大堆了！
      

  4.   

    有一大堆的edit，如果每个都添加一个onkeypress方法，不是很麻烦
    有更好的方法吗  loves123() :怎么用Enter来代替Tab