delphi xe6 firemonkey 更改表单样式运行时

【问题标题】：delphi xe6 firemonkey change form style runtimedelphi xe6 firemonkey 更改表单样式运行时
【发布时间】：2014-07-19 22:23:56
【问题描述】：

您好，我该如何更改（delphi firemonkey 移动应用程序）样式书运行时

formcreate 或 formshow 时我会尝试从 ini 或文本文件加载

但不能工作 stylename 是字符串

我尝试过这段代码，但代码 1 可以工作，但代码 2 不能工作

if RadioButton1.IsChecked then  Form1.StyleBook:=white else Form1.StyleBook:=black;

我需要

form1.stylebook:= trim(Copy(Memo2.Lines.Strings[0],7,30)); {string ='black'}

但错误代码：[dcc32 Error] main.pas(226): E2010 不兼容的类型：'TStyleBook' 和 'string'

【问题讨论】：

标签： android delphi firemonkey delphi-xe6

【解决方案1】：

澄清一些困惑：

StyleBook 属性需要 TStyleBook 的对象实例类型，因此您尝试将字符串传递给该属性将产生不兼容类型错误。
StyleName 是样式或样式子组件的名称。我不确定您为什么提到 StyleName 属性，因为它似乎与您的问题没有任何关系。

回到您的问题，如何在运行时将样式加载到 TStyleBook 中并将其应用于表单？

var
  aStyleBook : TStyleBook;
begin
  // Create styleBook and assign the main form as its owner
  aStyleBook := TStyleBook.Create(Self); 
  // Load style from file or Stream
  aStyleBook.Resource.LoadFromFile('...'); 
  // set the loaded style as active style
  Self.StyleBook := aStyleBook;
end;

【讨论】：