各位前輩，小弟請教一個窗體置頂的問題。我的想法如下：
FORM1是MID的父窗體/也是程式的主窗體。
FORM2是一個普通窗體。FormStyle:=fsStayOnTop;
在FORM1,2 創建完成後，我想通過SHOW的方法，讓FORM2顯示到程式的最上層，即置頂。而且希望這時候，FORM2是活動狀態，即有輸入焦點。
我的代碼如下，問題是FORM2可以置頂，但是標題欄依然是灰色，非活動狀態，請各位前輩指點，萬謝～



[code delphi]
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
form2.Show;
Application.Run;
end.

[/code]

試試在兩者建立完後,
Form1 的 OnActive
加入 Form2.setFocus;

謝謝您給的方向，我在FORM1中加了如下代碼，問題解決，興奮中～

[code delphi]
procedure TForm1.FormActivate(Sender: TObject);
begin
if form2.showing then
form2.SetFocus;
end;
[/code]