//参考如下代码
var
vHandle: THandle;
begin
vHandle:=FindWindow( 'TForm1 ', nil); //寻找MDI主窗体FROM1类
Memo1.Lines.Add(IntToStr(vHandle));
vHandle:= FindWindowEx(vHandle, 0, 'MDIClient ', nil); //寻找MDI容器区域
Memo1.Lines.Add(IntToStr(vHandle));
vHandle := FindWindowEx(vHandle, 0, 'TForm3 ', nil); //寻找MDI子窗体TFORM3子窗口类
end;
如果遇到MDI窗体父类为panel,则先查找到panel.然后再次查找mdi窗体.