关于TAB的问题，应该很简单。

Question

1。如何用方向键代替tab和shift+tab
2。一个form中有4个edit，每个edit的最大长度为5。当在一个edit中输满5个字符后自动跳到下一个edit中，就像安装win2k时输入sn时那样

Answer 1

1、利用截取消息实现。
2、if length(edit1.text)>5 then 
     edit2.setfous;

Answer 2

2、在每个TEDIT的KeyUp事件里，判断
if Length((Sender as TEdit).Text) >= 5 then
  跳到下个EDIT1、TEDIT的KeyUp事件里
     if Key=13 then （13是回车，37，38，39，40方向键）
     begin
         Key := #0 ;
         Perform(CM_Dialogkey,VK_TAB,0);
     end

Answer 3

to LKJ99(阳江in深圳,路在何方...)ok，有启发。给分。