delphi - 当面板大小更改时，如何将控件保留在面板的底部或右侧？

Question

有一些类似的问题及其解决方案，但没有人回答我的问题，所以这里是。

制作一个带有 TButton 的 TPanel 折叠/展开非常简单，至少我是这么认为的。我尝试了一下，将按钮放在最顶部(用于从上到下的高度扩展/折叠)或左侧(用于从左到右的宽度扩展/折叠)，一切都按计划进行。事实上，所有可展开/可折叠的“高级”面板都以完全相同的方式工作 - 按钮仅放置在顶部或左侧。很快我就碰壁了:如果你将按钮放在底部或右侧分别用于扩展/折叠高度或宽度，按钮将保留在它们所在的位置......客户区域(？) - 我缺乏解释的知识这是正确的，但我会假设，除非另有指出，否则发生的事情是清楚的。关键是，按照我这样做的方式，唯一的解决方案是在面板中重新定位按钮，但这可能会放在一些根本不应该可见的其他组件之上。

所以问题是:我怎样才能正确地实现这一点？因为我调整面板大小然后重新定位按钮的想法看起来不是解决此问题的正确方法。或者，我很乐意采用一些执行此操作的组件，但是从我检查过的组件来看，所有组件的行为都是相同的，甚至 JEDI VCL TJvRollOut 组件也可以设置 Placement (按钮/标题的)仅适用于 plTop 或 plLeft，所以我认为这不是那么简单吗？

Answer 1

设置为您的按钮Anchors属性为 [akLeft, akBottom]。