在Form的OnResize中写代码:
  Label1.Left := (Width - Label1.Width) div 2;
  Label1.Top := (Height - Label1.Height) div 2;

解决方案 »

  1.   

    一:设置label的align为:alClient;
    二:alignment为:taCenter
    三:layout为:tlCenter
    行了。
      

  2.   

    chechy(chechy)说的没错,但最好同时设label1.autosize:=true; 在Form1.OnCreate中加入
      Label1.Left := (Width - Label1.Width) div 2;
      Label1.Top := (Height - Label1.Height) div 2; 
    这样更好
      

  3.   

    哦,忘了说,Form1的AutoSize是False,也没标题栏的,Form1不能更改大小的我先试试看呀
      

  4.   

    我用了chenjiong(准程序员)的,但是大家同得分呀。谢谢了哈^_*