关于button的一个问题,急,急,急

我在做一个登录窗体时,窗体上有两个编辑框,两个Button,我想在最后一个编辑框编辑完后button1自动成为有焦点的,我该怎样做呢.谢谢高手指点.

解决方案 »

  1.   

    有什么可以判断你的最后一个编辑框编辑结束了呢？
    假设是用回车的话，就在编辑框里的keypress中判断 if key=$13 then Button1.setfocus;
      

  2.   

    如果密码规定为6位的话：
    procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
      if Length(Edit1.Text)=6 then
        Button1.SetFocus;
    end;
    如果想按回车到BUTTON的话用楼上的方法！
      

  3.   

    对
    或者定义taborder，用tab切换焦点
      

  4.   

    TO上面的朋友,问题是我的密码不是固定的位数,如6_12位的怎么判断呢,我想在编辑框中当密码输入完后当鼠标离开编辑框时Button1就自动成为焦点.用TAB好象不是很好.
      

  5.   

    通过selectnext函数，将Enter键转换成tab键就可以实现了if key=#13 then
    begin
      Selectnext(activecontrol,true,true);
      Key:=#0;
    end;
      

  6.   

    还是用回车判断方便一点..
    keypress事件里,当key=#13时,setfocus一下,很好...
      

  7.   

    SetFocus;可以得到焦点，但不知何时为编辑完？
    回车？在keypress事件里,当key=#13时