首页 > 代码库 > DELPHI控件具有多个属性的动态设置方法
DELPHI控件具有多个属性的动态设置方法
本人初学DELPHI,遇到了个比较麻烦的问题就是没办法动态设置有多值的控件属性,在网上找了很多资料收获不大,经过自己研究,找到了一些方法,先记录下来以备使用.
1. 控件只有单一属性值设置方法:
form1.Align属性有: alNone,alLeft,alRight,alTop,.....等等,在编程中实现方法
方法1: form1.Align:=alNone; 或 form1.Align:=alRight .....
方法2:
form1.Align:=TAlign(5); 等同于 form1.Align:=alClient;
2. 控件具有多属性时的设置方法:
方法: form1.BorderIcons:=[biSystemMenu,biMaximize,biMinimize] ; //可实现如上图的设置.
如果我要去掉某个值呢,那又如何实现动态设置这些属性呢?
增加属性方法:
form1.BorderIcons:=form1.BorderIcons+[biSystemMenu]; 或 form1.BorderIcons:=form1.BorderIcons+[TBorderIcon(0)];
去掉属性方法:
form1.BorderIcons:=form1.BorderIcons-[biSystemMenu]; 或 form1.BorderIcons:=form1.BorderIcons-[TBorderIcon(0)];
到这里,我发现只要改变一下 [TBorderIcon(0)] 数组中的数字,即可实现动态设置.该数组共有4个值分别对应不同的属性.如下图.
可以使用变量来代替.到此成功.
DELPHI控件具有多个属性的动态设置方法