FMX.Styles.TStyleManager.SetStyle

• Übergeordnet: 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 */;

Eigenschaften

Typ	Sichtbarkeit	Quelle	Unit	Übergeordnet
procedure function	public	FMX.Styles.pas FMX.Styles.hpp	FMX.Styles	TStyleManager

Beschreibung

Setzt den aktiven Stil auf die im Parameter Style angegebene Instanz.

Um den aktiven Stil auf den nativen Systemstil zu setzen, zum Beispiel Windows-Theme, übergeben Sie nil als Style-Parameter.

Hinweis: Wenn Sie die Funktion SetStyle im initialization-Abschnitt einer Unit der Hauptprojektdatei vor Application.Initialize angeben, dann wird sie für alle Formulare angewandt.

Beispiel

Dieser Delphi-Code zeigt die Verwendung von 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;

Siehe auch

• FMX.Styles.TStyleManager.SetStyleFromFile