1

私がこれを持っているすべての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 フォームを変更すると、パネルがその上に配置されます。

4

0 に答える 0