delphi - 如何自动调整嵌套 TcxGroupBox 的大小

Question

我正在使用 DevExpress 2012 控件创建一个模拟纸质表单外观的应用程序，以便轻松输入数据。

表单的每个部分都是一个 TcxGroupBox。在每个 TcxGoupBox 内部可以有许多其他 TcxGroupBox 在同一级别和/或嵌套级别。

它们都带有 TcxGroupBox.Align = alTop

但是，根据数据的某些参数，可以隐藏某些组，这会导致其他组对齐到顶部，这是正确的。

我的问题是如何自动调整每个 TcxGroupBox 底部边框的大小。当一个组被隐藏时，同一级别的所有组都对齐到顶部，并且在底部将 - 保留隐藏组左侧的空间。它的父组没有 auto=resize 属性。当需要显示隐藏组并且父组需要调整大小以适应它时，反之亦然。

我正在使用德尔福 XE2

Answer 1

您应该相应地设置每个 group boy 的 height 属性。我想这取决于可检查项目的数量和列数。使用这种方法的优点是您的所有行（即可检查项目）均等对齐。

尽管我喜欢自动对齐的可能性，但我倾向于自己在边界容器（面板、组框、表单、框架）的 OnResize-Event 中设置这些元素的大小和位置。