怎么控制delphi里的控件随窗口的大小而改变大小啊?
怎么控制delphi里的控件随窗口的大小而改变大小啊?
设置控件的anchors
procedure TForm1.FormResize(Sender: TObject);
begin
[red]设置控件大小[/red]
end;
或设置panel1.align:=alClient
很想知道!
随窗口的大小而改变大小 的规则有很多种,简单的,上面的说法就行了
复杂的规则,自己在resize事件里写代码调整都比较困难
可视控件大部分都有Align属性,即对齐属性,充分利用这个属性即可不用代码调整控件位置
例:
有一个按钮,我希望它始终在窗口的下方,并且在最右边。
可以这样做:
界面中添加一个Panel控件(Panel1),设置其Align属性为alBottom,即下方对齐,这样无论如何改变窗体大小,Panel都在窗体下方,其高度不变。(为了美观,可设置Panel的BevelOuter为bvNone,设置Panel的Caption为空)
在Panel1中再添加一个Panel控件(Panel2),设置其Align属性为alRight,即右侧对齐,改变其宽度为需要的宽度,比如100。
最后在Panel2中添加一个TButton控件,就OK了。
如楼上,通过panel来控制位置
楼主的是想让控件随着窗口的分辨率自动适应显示的大小吧?
FormResize+panel+align属性
相关问答:
我在模块里自定义了一个函数:stradd()
可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...
这个问题有什么办法可以解决的吗? 非常感激!
(在A ......
Delphi
怎样获取网页部分内容(代码),并且显示出来!
(只是网页里面的一部分内容并不是全部)
没弄懂!
类似websever的功能?
估计是利用ie的接口。。。。。。。。
是类似websever的功能 ......
昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下:
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......
我的代码如下,怎么总提示连不成功:
type
GUID = record //申明调用RAS(创建VPN连接用)函数所需结构体
Data1: integer;
Data2: Shortint;
Data3: Shortint;
......