窗口显示问题

Question

有两个窗体：form1中：一个button  和 form2unit.pas是：unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    Edit1: TEdit;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation
uses unit2;
{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);beginform2.Show;//显示form2窗体end;end.单击form1中的按钮，form2显示再单击form1 时，form2 窗体遮住了form1如何在单击 form1 时，让form1窗体显示在form2 窗体前面，
 

Answer 1

unit Unit1; interface uses 
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
  Dialogs, StdCtrls; type 
  TForm1 = class(TForm) 
    Button1: TButton; 
    Edit1: TEdit; 
    procedure Button1Click(Sender: TObject); 
  private 
    { Private declarations } 
  public 
    { Public declarations } 
  end; var 
  Form1: TForm1; implementation 
uses unit2; 
{$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin form2.Show;//显示form2窗体 
   self.BringToFront;//form1置前
end; end. 

Answer 2

怎么可能！别耍我，你看看你的form1最后是不是form2前面？！

Answer 3

如果，form1 和 form2 的 position 属性都设置为 屏幕中心 还是不行啊

Answer 4

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
  b: Boolean;implementationuses Unit2;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
  if form2.Tag = 1 then
    begin
    form2.Show;
    form2.Tag := 2;
    end
  else
    begin
    form1.Show;
    form2.Tag := 1;
    end;
end;end.

Answer 5

form2.Show; 
form1.Show;
两句对调一下.

Answer 6

是可以的，单击form1的按钮，显示form2后，form1还是会在前面啊。要么你没把问题描述清楚，要么你是在耍人了 -_-!

Answer 7

你的要求是：如何在单击 form1的按钮 时，form2显示后，再让form1窗体显示在form2 窗体前面

Answer 8

form2的 FormStyle 设成了 fsStayOnTop？

Answer 9

可能是我没有说清楚，抱歉，但绝对不是耍人的1.程序启动，出现 form1窗体2.单击form1窗体上的按钮3.出现 form2 窗体此时 form2 窗体在form1 前面如果这时候，我单击form1 窗体，想让 form1 窗体显示在前面，form2窗体在后面

Answer 10

你单击form1不能置前吗？
那你的form2就是9楼说的风格---stayonTop,既然要“我单击form1 窗体，想让 form1 窗体显示在前面，form2窗体在后面”，就没必要设定formstyle

Answer 11

很简单啊，把form1设置成主窗体就行了
状态栏（project）-options下