FMX.Styles.TStyleManager.SetStyle

• 親: TStyleManager

Delphi

class procedure SetStyle(const Style: TFmxObject); overload;
class procedure SetStyle(const Context: TFmxObject; const Style: TFmxObject); overload;

C++

__classmethod void __fastcall SetStyle(Fmx::Types::TFmxObject* const Style)/* overload */;
__classmethod void __fastcall SetStyle(Fmx::Types::TFmxObject* const Context, Fmx::Types::TFmxObject* const Style)/* overload */;

プロパティ

種類	可視性	ソース	ユニット	親
procedure function	public	FMX.Styles.pas FMX.Styles.hpp	FMX.Styles	TStyleManager

説明

Style パラメータで指定されたインスタンスをアクティブなスタイルに設定します。

アクティブ スタイルをネイティブ システム スタイルに設定するには（たとえば Windows テーマなど）、nil を Style パラメータとして渡します。

メモ： メイン プロジェクト ファイルでユニットの initialization セクションにおいて Application.Initialize より先に SetStyle 関数を呼び出した場合、設定したスタイルはすべてのフォームに適用されます。

例

次の Delphi コードは、StyleManager の使用方法を示しています。

Delphi：

procedure TForm1.FormCreate(Sender: TObject);
  var
    od : TOpenDialog;
  begin
    od := nil;
    try
    od := TOpenDialog.Create(self);
    od.Filter := 'Style Files|*.style';
    if od.Execute() then
      TStyleManager.SetStyleFromFile(od.FileName);
  finally
    od.Free();
  end;
end;

関連項目

• FMX.Styles.TStyleManager.SetStyleFromFile