如何使控件的位置和大小随窗体的变化而变化(100分)

  • 主题发起人 主题发起人 zhlfdm
  • 开始时间 开始时间
Z

zhlfdm

Unregistered / Unconfirmed
GUEST, unregistred user!
使控件的大小和位置无论在运行阶段和设计阶段使同比例放缩的。及不变形。。在程序运行时任意改变窗体大小。窗体中控件仍然保持原先的相对位置。大小可随窗体大小放缩。。。
急。急。。。。
 
忘了最好有原代码。。。。gongzuobuhaozhao@163.com
 
写代码控制，或者设置控件的archors属性。
 
archors不好用试过了。。。
代码怎么写呀。。。望赐教
 
在Form的ONRESIZE里控制控件的位置。
最好加上几个Panel来布局。
 
简单的方法：
使用PerfectSizeVCL控件
 
我是在一个窗体中调用另一个窗体。。。
如form1,form2
我设form2.parent:=form1;
form2.show;
将form2显示在form1中。
然后要控制form2中的控件大小变化。而form1中的不变。。。
 
窗口大小变化系数 K
变化时
Button1.Left := Button1.Left * K ;
Button1.Top := Button1.Top * K ;
Button1.Width := Button1.Width * K;
Button1.Height:= Button1.Height * K ;
 
to:liuchong
哪有这个控件的下载地址呀
 
to:网中戏
你不会叫我一个一个的写吧。。晕
 
有循环啊
for i := 0 to AControl.ControlCount - 1 do
 
只能写代码,对每一个控件的位置
 
你要的是这个吧：
设置From的AutoSize为True
From的ScaleBy方法调整比例：
From1.ScaleBy(50,100); //缩小到 50%
试试看，控件的布局不变，尺寸随着窗体缩小了。
（如果是Image控件要设Strech属性）
 
to:
VictorWoo
试过了。如果拖拉的话就不好用了。。。。。
5555555555
 
设置控件的archors属性
 
拿代码写完了。。。还是感觉有点缺陷。。希望各位继续给点意见。。。谢谢。。
 
多人接受答案了。
 
您必须登录或注册才可回复。

Similar threads

不
Delphi实现类似Android锁屏的密码锁控件 - 不得闲
回复
0
查看
971
不得闲
不
X
使用kbmmw 的调度事件动态显示时间 - xalion
回复
0
查看
948
xalion
X
X
初识kbmmw 中的smartbind功能 - xalion
回复
0
查看
848
xalion
X
S
[原]UNIGUI中控件类名的变化
回复
0
查看
896
SUNSTONE的Delphi笔记
S
S
[原]UNIGUI中控件类名的变化
回复
0
查看
873
SUNSTONE的Delphi笔记
S
后退
顶部