发送给MDI客户窗口的消息MDI消息WM_MDICASCADE

MDI消息WM_MDICASCADE是发送给MDI客户窗口的消息，使所有未最小化的MDI子窗口按照层

WM_MDICASCADE 
WM_MDICASCADE是发送给MDI客户窗口的消息，使所有未最小化的MDI子窗口按照层叠的方式排列。惟一支持消息的参数wParam的值是MDITILESKIPDISABLED，它用于避免被禁用的窗口发生移动。参数lParam未使用，设置为零。如果发送成功，返回值为TRUE，否则返回FALSE。

procedure TForm.Cascade;
begin
  if (FFormStyle = fsMDIForm) and (ClientHandle <> 0) then
    SendMessage(ClientHandle, WM_MDICASCADE, 0, 0);
end;