又问这种问题,不好意思……

解决方案 »

  1.   

    在form的SHOW事件中写edit.setfocus
      

  2.   

    :-)
    那你在 ONShow中写 
    yourEdit.SetFocus.不过要注意 你的Edit
    1。Visible := True;
    2。Enabled := True;好像还有一个属性
      

  3.   

    procedure TCustomForm.SetFocus;
    begin
      if not FActive then
      begin
        if not (Visible and Enabled) then
          raise EInvalidOperation.Create(SCannotFocus); // here
        SetWindowFocus;
      end;
    end;
      

  4.   

    要么就是SetFocus,不过最好之前判断一下Edit的状态,否则代码是不安全的,另外,绝对不要在FormCreate里边写这句代码,要么就直接设置TabOrder
      

  5.   

    方法1:设置窗体的ActiveControl属性为Edit1;
    方法2:设置Edit1.Taborder := 0;
    方法3:在窗体的SHOW事件中写Edit1.Setfocus;
      

  6.   

    窗体的OnFormShow事件中:Edit1.setfocus;