MDi 窗口页签显示

[lancechu]

我用的是MDI 窗口，怎么才能做到像QQ游戏那样打开一个房间，窗口就像增加一个Pagecontrol的页签一样，点哪个页签显示哪个页签下的窗体，哪个高手做过类似的，给出一段代码供小弟参考一下，同时分数送给您。。。。。。

[lancechu]

怎么没人回答呢？
自己先顶

[baseyueliang]

没错，目前流行的父子窗体应用已经不使用mdi方式了。把一个普通的窗体视作为主窗体，上面放置PageConrol,当打开新子窗体时：
var
ts: TTabSheet;
frm: TFrmYourChind;
begin
ts:= TTabSheet.Create(Self);
ts.PageControl := ThePageControl;
frm := TFrmYourChind.Create(Self);
frm.Parent := ts;
frm.Align := alClient;
frm.BorderStyle := bsNone;
frm.Show;
end;

[ron_xin]

借问一下楼上的,关闭窗体如何处理?

[baseyueliang]

childForm.OnClose = YourHandleProc;

[baseyueliang]

or use
Notification