Question

在这种情况下，我通过RADStudio XE2在FireMonkey HD应用程序上创建了一个默认按钮。然后我为按钮创建了一个名为“Style1”的自定义样式。此样式与默认按钮样式非常相似，但它在TText控件旁边有一个TImage控件。

简单来说，一个按钮，文本旁边有一个图像。

现在，我将图像应用于按钮的TImage控件？因为如果我将图像应用于样式设计器的TImage控件 VIA ，则使用该样式的其他控件也将获得相同的图像。

Answer 1

你可以在运行时完成。首先，您必须为您的图像样式对象命名，例如。 “燃烧” 之后，您可以使用FindStyleResource按名称找到它：

procedure LoadImage(btn : TButton; imgFileName : string);
var img : TImage;
begin
    img := btn.FindStyleResource('btnimg') as TImage;

    if not assigned(img) then exit;

    img.bitmap.LoadFromFile(imgFileName); 
end;

Answer 2

您可能对我的TBitmapSpeedButton控件感兴趣，该控件已准备好此功能： http://monkeystyler.com/blog/entry/my-first-firemonkey-custom-control-tbitmapspeedbutton 加上从样式资源加载图像的更新： http://monkeystyler.com/blog/entry/tbitmapspeedbutton-loading-images-from-the-style

如何在样式设计器之外编辑FireMonkey样式中的控件？

2 个答案: