********大侠快来帮帮忙啊?********(50分)

var
tmpPBt: TButton;
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from T_User');
adoquery1.Open;
adoquery1.First; while not adoquery1.Eof do
begin
tmpPBt := TButton.Create(Self);
tmpPBt.Parent := Panel1;
tmpPBt.Caption := adoquery1.fieldbyname('用户').asString;
adoquery1.next;
end;
??????????????????????????进行按钮的排列
end;
怎么根据动太产生的按钮像QQ界面一样进行相应的顺序排列啊!
就是如何计算一下按钮大小和位置并进行排表!
请高手帮帮忙啊!谢谢了....各位...