已Create的MDI子窗体激活？

Question

我的程序，（在主窗体单元中）
procedure TfMian.CustomItem8Click(Sender: TObject);
var
  CKsChild: TCKfChild;
begin  if not assigned(Application.FindComponent('CKfChild')) then
  begin
    CKsChild := TCKfChild.Create(Application);
    CKsChild.Caption := '仓库管理';
  end
  else
    （SetFocus // 没反应，Show  // 没反应）这里到底改用什么来激活一个
      已经创建的窗体啊？？？？？？？？
end;

Answer 1

你直接这样不就可以吗？
procedure TfMian.CustomItem8Click(Sender: TObject);
var
  CKsChild: TCKfChild;
begin
    CKsChild := TCKfChild.Create(Application);
    CKsChild.Caption := '仓库管理';
end;

Answer 2

明白你的问题了，你把主Form的WindowMenu属性随便选一个菜单，然后多创建几个子窗体，看看刚才你选的菜单下的选项，是不是多了几个和子窗体同名子菜单，选择看看是不是你想要的。