100分求助，请问自己编写组件时，如何设置组件在容器中的位置

Question

例如：大家都用过状态栏组件吧，你只要将组件一放到窗体上，该组件就会自动的跑到窗体的最下方，并且站满整个宽度，我有一个组件，自己写的，也要实现这个功能，怎样写代码呢？保证给分，决不失言

Answer 1

用 Align 實現最簡單了!
如果該該組件沒有align屬性, 那就用它的運行時的 parnet,
if XXX.Parent <> nil then
begin
  self.width := TComponet(XXX.parent).width;
  self.top := TComponet(XXX.parent).height - self.top;
  ....
end;

Answer 2

对了对了，就是因为没有Align，不过你说的parent方法可以，我试了也成功了，呵呵，多谢了，想不到这么快就解决了，给分