如何在调整大小时使控件粘贴到其父边框?

时间:2010-02-08 07:26:58

标签: delphi delphi-2009

我有一个TGroupBox作为父母,我想在其中放置一个按钮,然后使按钮粘在组合框的右上角。

问题是,TGroupBox没有方法OnResize,因此我不知道如何告诉按钮在调整组框大小后它应该移动到哪里。

有没有办法让它成真?

谢谢

2 个答案:

答案 0 :(得分:7)

将按钮的Anchors属性设置为包含akTopakRight。当其父级的大小发生变化时,它将移动以保持其顶部和右侧偏移量相对于父控件的边缘保持不变。默认值为akLeft。 (如果同时设置了akLeftakRight,则按钮的宽度将随其父级增长和缩小。)

AlignAnchorsConstraints属性之间,您很少需要编写任何自己的代码来处理对父级大小的更改。

答案 1 :(得分:3)

将其放置在正确的位置并将其属性Anchor.akLeft更改为false,将Anchor.akRight更改为true。无需附加任何事件。

所以Anchor将是:

.akTop = true
.akLeft = false
.akBottom = false
.akRight = true

(groupbox中按钮的属性)