delphi - 保持面板始终位于 mdi 应用程序底部

Question

我想知道，如何让面板始终位于我拥有的所有 mdi 表单的底部。

      procedure TPanel.Loaded;
      begin
      Windows.SetParent(Handle, MainForm.ClientHandle);
      end;  


       procedure TPanel.WMWindowPosChanging(var Message: TWMWindowPosChanging);
         begin
           inherited;
           Message.WindowPos^.hwndInsertAfter := HWND_BOTTOM;
         end;

但是，当我使用系统菜单的表单和下一个命令更改 MDI 表单时，面板放在上面谢谢和抱歉我的英语