获取MDI窗体的空白区的坐标

获取MDI窗体的空白区的坐标

在MDI窗体中，除去菜单，工具栏，还有放置的一些Panel，例如Align=alLeft的Panel外的区域为空白区域，如何获取这个区域的坐标呢？

procedure TForm1 . Open1Click ( Sender : TObject );

var

 R : TRect ;

begin

 Windows . GetClientRect ( ClientHandle , R );

 Windows . MapWindowPoints ( ClientHandle , HWND_DESKTOP , R , 2 );

 Form2 . Left := R . Left ;

 Form2 . Top := R . Top ;

 Form2 . ShowModal ;

end ;