delphi - 使用 TScrollBox 包含 TExpander 组件

Question

好吧，我有一个与表单左侧对齐的滚动框，在滚动框中我有与顶部对齐的 TExpander 组件，此扩展器超出了滚动框的区域，所以我猜滚动条必须是可见的，但它们不是。我认为问题在于 Texpanders 顶部的对齐方式，因为如果我更改 Texpander 的对齐方式，则超出滚动框的边距以 alNone 滚动条出现，但我需要将 Texpander 对齐在顶部，因为他的尺寸恒定变化。有任何想法吗？非常感谢！

Answer 1

不知道它为什么起作用，但是将“ TExpander.Align ”设置为“ alTop ”，然后将“ TExpander.Anchors ”设置为：

akLeft = True
akTop = True
akRight = False
akBottom = False

为我工作；）