怎样判断一个子窗体是否已经存在？

Question

如果存在就跳过，不存在就Create.

Answer 1

if Application.FindComponent('Form2')<>Nil then
   Form2.Show;

Answer 2

if not assigned(f_person) then
begin
  f_person:=Tf_person.Create(self);
  f_person.Show();
end
else
  begin
  f_person.BringToFront;
  f_person.SetFocus;
  end;

Answer 3

function TfrmMain.FindChildWindow(strClassName: string): Boolean;
var
  i: Integer;
begin
  Result := False;
  for i := 0 to FrmMain.MDIChildCount - 1 do
  begin
    if FrmMain.MDIChildren[i].ClassName = strClassName then
    begin
      Result := True;
      Exit;
    end;
  end;
end;