滚动字幕遮住菜单栏怎么办？

Question

  我现在做的宿舍管理系统做了一个滚动字幕，但运行时遮住菜单栏，但明明制作时我没有遮住菜单栏，一运行就这样，菜单栏没有了，应该怎样改。滚动字幕在菜单栏和图片之间的空位上。
procedure Tmainform.FormCreate(Sender: TObject);
begin
   Label1.Caption:='欢迎使用学生宿舍管理系统  '+DateTimeToStr(now);
   Label1.Left:=mainform.Width;
   Label2.Caption:=Label1.Caption;
   Label2.Left:=2*mainform.Width;
   Label2.Top:=Label2.Top;
end;procedure Tmainform.Timer1Timer(Sender: TObject);
begin
    if label1.Left>-Label1.Width then
    Label1.Left:=Label1.Left-1
    else
    Label1.Left:=2*mainform.Width-Label2.Width;
    if Label2.Left>-Label2.Width then
    Label2.Left:=Label2.Left-1
    else
    Label2.Left:=2*mainform.Width-Label1.Width;
    Label1.Caption:='欢迎使用学生宿舍管理系统  '+DateTimeToStr(now);
    Label2.Caption:=Label1.Caption;
end;end.

Answer 1

滚动字幕在菜单栏和图片之间的空位上。
=============================================================
在空位置放一个TPanel对象，然后Label1放在TPanel对象上