怎样将窗体带到最前面？

Question

窗体的formstyle属性设置为fsstayontop

Answer 1

对啊，上面的兄弟都说了。还有就是你可以再次show密码窗体不就到前面来了

Answer 2

FORM.ShowModal就一定在最前面

Answer 3

窗体的formstyle属性设置为fsstayontop

Answer 4

我设置project的autoCreate窗体只有主窗体一个；

Answer 5

我是在主窗体的onshow事件里进行如上操作的，可能是此过程之后，onshow动作把主窗体设置成最前面了。

Answer 6

可以用以下的函数实现:
procedure Tmainform.RestoreRequest(var message: TMessage);
 begin
   if IsIconic(Application.Handle) = TRUE then
      Application.Restore
   else Application.BringToFront;
 end;

Answer 7

procedure TFormMain.formcreate(Sender: TObject);
begin
  formmain.Visible:=false;
  form_login:=TForm_login.Create(application);
  form_login.Show;
  form_login.Refresh;
end;procedure TFormMain.FormActivate(Sender: TObject);
begin
if form_login.Showing then form_login.SetFocus;
end;

Answer 8

在工程文件的begin...end.之间啊！
begin
  Application.Initialize;
  Application.Title := '应用程序标题';
  FrmUserLogin:=TFrmUserLogin.Create(nil);
  FrmUserLogin:=TFrmUserLogin.Create(nil);//密码验证窗体  
  try
    FrmUserlogin.ShowModal ;
    if FrmUserlogin.LoginValue = True then//验证成功
    begin
      Application.CreateForm(TFrmMainUnit, FrmMainUnit);
      Application.Run;
    end;
  finally
    FrmUserlogin.Free;
  end;
end.

Answer 9

yopeng(小混混) 说的对，应该在工程文件中进行处理，但我觉得是否应该是这样写：begin
  Application.Initialize;
  Application.Title := '应用程序标题';
  FrmUserLogin:=TFrmUserLogin.Create(Application);
  FrmUserLogin.Update;
  FrmUserlogin.ShowModal ;  if FrmUserlogin.ModalResult = mrOK then//验证成功
  begin
    FrmUserlogin.Hide;
    FrmUserlogin.Free;
  
    Application.CreateForm(TFrmMainUnit, FrmMainUnit);
    Application.Run;
  end
  else
  begin
    Application.Terminate;
  end;
end.