还是关于label设置的问题

以下程序段procedure TForm1.FormCreate(Sender: TObject);
begin
  Label1.Caption:='设计: 张三'+#13+#13
             +'编程: 李四'+#13+#13
             +'测试: 王五'+#13+#13
             +'配音: 赵六'
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
   Label1.Top:=Label1.Top-1;
   //如何显示结束,则重新开始
   if(Label1.Top<label1.Width-30) then
      label1.Top:=form1.Height;
end;
我在label属性设置中autosize设置的是false,结果只有一个 设计: 张三 在移动,其他三个都看不到我把label中autosize设置成true的时候,四个都能看到,但是只能看到后面的半个字,无论怎么改变属性width都没用,谁能指点一下,初学者问