首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

请教怎么用一个窗口包住两个程序

2012-09-10 
请问如何用一个窗口包住两个程序~我有一个游戏- -,必须用登录器登录,我想用一个窗口包住登录器和游戏主程

请问如何用一个窗口包住两个程序~
我有一个游戏- -,必须用登录器登录,我想用一个窗口包住登录器和游戏主程序~请问用DELPHI如何实现~~~

[解决办法]
以绑架“记事本”为例:

在窗体的private中定义
hwndOldParent:HWND;
hwndNotePad:HWND;

将窗口的FormStyle设为fsMDIForm

Delphi(Pascal) code
procedure TForm1.Button1Click(Sender: TObject);begin  hwndNotePad:=FindWindow(PChar('Notepad'),0);//获取记事本的窗体句柄  hwndOldParent:=GetParent(hwndNotePad);//记住其“父亲”  Windows.SetParent(hwndNotePad,handle);//绑架end;procedure TForm1.FormDestroy(Sender: TObject);begin  //交还被“绑架”者给其原来的“父亲”:   Windows.SetParent(hwndNotePad,hwndOldParent);end; 

热点排行