Delphi XE6 如何设计并使用FireMonkeyStyle

介绍

 

FireMonkey使用Style来控制控件的显示方式。

每个控件都有一个StyleLookup属性，FireMonkey就是通过控件的这个属性来在当前窗体的StyleBook控件中查找匹配的Style，如果找到了这个Style，那么控件就使用这个Style来显示。

 

 

StyleBook是一个Style的集合，里面可以有窗体的Style，按钮的Style，文本框的Style，等等。每个Style其实就是一个控件，像常用到的TLayout，TRectangle等等，只是这个控件需要设置它的StyleName。

比如我在StyleBook中设计这样一个按钮：

• Layout:TLayout（StyleName设置为“defaultbutton”）
• Rectangle:TRectangle（用来显示按钮背景）
• Text:TLabel（用来显示按钮标题）

 

那么这个Layout就表示了一个名为“defaultbutton”的Style。如果这时候，窗体上放一个Button，然后将它的StyleLookup属性为“defaultbutton”，FireMonkey就会从当前窗体的StyleBook中遍历我们设计的所有控件，查找StyleName为Button的StyleLookup属性值的控件，也就是StyleName为“defaultbutton”的控件，就是我们刚才设计的Layout控件，查找到了之后，就返回一个Layout的克隆，也就是复制一个Layout（它的子控件也会复制进去），然后在Button上显示出来。

具体的请下载附件后查看

XE6, 文本框, Style, FireMonkeyStyle, XE6

 

转载请保留当前帖子的链接：http://www.dfwlt.com/forum.php?mod=viewthread&tid=475 谢谢！