delphi - 如何使用 DevExpress LayoutControl 的 minWidth、minHeight？

Question

我已经开始使用 DevExpress LayoutControl 了。感觉很强大，但我没有得到我想要的。我想设置组件的最小宽度和最小高度，因为对话框不可能很小，但它看起来仍然不错。同时我想让用户拥有任意大的尺寸，并让组件平等地共享宽度和高度。而且我不想要任何滚动条。我怎样才能做到这一点？

还有一件事。由于其他情况，我仍然使用Devexpress的旧版本6.38。最新版本的 LayoutControl 是否修复了许多错误？难道是这个阻止了我吗？

/罗兰

Answer 1

我认为您无法在 LayoutControl 中指定控件的最小高度/宽度。您当然可以使用标准的 constraints 属性，它会起作用，但看起来很难看。

问题是您到底想要实现什么目标？ LayoutControl 尝试调整其控件大小，以便一切都尽可能合适。由于许多控件都挤在太小的空间中，因此会出现滚动条，但还会发生什么？

设置良好的可调整大小布局的关键是调整布局项/组的 AlignHoriz 和 AlignVert 属性。对于可调整大小的控件(例如备忘录或网格)，将它们设置为 ahClient/avClient 。此外，您通常希望 LayoutControls 的 AutoContentSizes 为 [acsWidth,acsHeight]

说到版本，我建议您升级到最新版本并尝试 LayoutControl V2 ，与 v1 相比，它具有一些附加功能，例如对拆分器和选项卡的支持。

这是一个可以逻辑调整大小的简单表单示例，您可以将其粘贴到空表单中:

object dxLayoutControl1: TdxLayoutControl
  Align = alClient
  AutoContentSizes = [acsWidth, acsHeight]
  object Edit1: TEdit
    BorderStyle = bsNone
  end
  object Button1: TButton
  end
  object Memo1: TMemo
    BorderStyle = bsNone
  end
  object dxLayoutControl1Group_Root: TdxLayoutGroup
    ShowCaption = False
    Hidden = True
    ShowBorder = False
    object dxLayoutControl1Group1: TdxLayoutGroup
      AutoAligns = [aaHorizontal]
      AlignVert = avClient
      object dxLayoutControl1Group2: TdxLayoutGroup
        ShowCaption = False
        Hidden = True
        LayoutDirection = ldHorizontal
        ShowBorder = False
        object dxLayoutControl1Item1: TdxLayoutItem
          AutoAligns = [aaVertical]
          AlignHorz = ahClient
          Control = Edit1
        end
        object dxLayoutControl1Item2: TdxLayoutItem
          ShowCaption = False
          Control = Button1
          ControlOptions.ShowBorder = False
        end
      end
      object dxLayoutControl1Item3: TdxLayoutItem
        AutoAligns = [aaHorizontal]
        AlignVert = avClient
        Control = Memo1
      end
    end
  end
end

希望对你有帮助