怎么样才可以使得窗体中的控件随窗体变化而变化

怎么样才可以使得窗体中的控件随窗体变化而变化 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061108163345274.html
怎么样才可以使得窗体中的控件随窗体变化而变化

设置Align和Anchors属性

在窗体的OnResize事件里重新设置一个目标控件的Left、Top、Width与Height值即可  
 

如果想要控件的位置变而大小不变,可以这样:  
  procedure   TForm1.FormResize(Sender:   TObject);  
  begin  
   
      Button1.Left:=round(left*clientwidth/fwidth);  
      Button1.Top:=round(top*clientheight/fheight);  
   
  end;  
  其中left,top   是最初button1的left与top值,fwidth,fheight是最初form1的width与height值.

posted on 2009-04-08 09:16  delphi2007  阅读(276)  评论(0编辑  收藏  举报