为什么用bringtofront没反应？

用两个panel，一个放上面一个放下面，然后用了个button，点button触发bringtofront 结果没反应哪里错了？
procedure TB_AIRWAYBILLFORM.Button_dompageClick(Sender: TObject);begin
if button_dompage.Caption='后页'
then
begin
button_dompage.Caption:='前页';
panel_dom1.BringToFront;
button_dompage.BringToFront;
endelse
begin
button_dompage.Caption:='后页';
panel_dom2.BringToFront;
button_dompage.BringToFront;
end;
end;