私がこれを持っているすべての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;
しかし、コマンド next でシステム メニューのフォームを使用して MDI フォームを変更すると、パネルがその上に配置されます。