delphi 动态布局，align = altop,如何保持顺序不变？

pnl_ep_p1.top := pnl_ep_p0.Top + pnl_ep_p0.Height;
pnl_ep_p2.top := pnl_ep_p0.Top + pnl_ep_p0.Height;
pnl_ep_p3.top := pnl_ep_p0.Top + pnl_ep_p0.Height;
pnl_ep_p1.Visible := false;
pnl_ep_p2.Visible := false;
pnl_ep_p3.Visible := false;
case rg_ep_escortnum.ItemIndex of
0:
begin
pnl_ep_p1.Visible := True;
pnl_ep_p2.Visible := False;
pnl_ep_p3.Visible := False;
end;
1:
begin
pnl_ep_p2.Visible := true;
pnl_ep_p1.Visible := True;
pnl_ep_p1.top := pnl_ep_p0.Top + pnl_ep_p0.Height;
pnl_ep_p2.top := pnl_ep_p1.Top + pnl_ep_p1.Height;
pnl_ep_p3.Visible := False;
end;
2:
begin
pnl_ep_p3.Visible := true;
pnl_ep_p2.Visible := true;
pnl_ep_p1.Visible := True;
pnl_ep_p1.top := pnl_ep_p0.Top + pnl_ep_p0.Height;
pnl_ep_p2.top := pnl_ep_p1.Top + pnl_ep_p1.Height;
pnl_ep_p3.top := pnl_ep_p2.Top + pnl_ep_p2.Height;

 

end;
else
begin
pnl_ep_p1.Visible := false;
pnl_ep_p2.Visible := false;
pnl_ep_p3.Visible := false;
end;
end;