FMX.Styles.TStyleManager.SetStyle
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 */;
Propriétés
| Type | Visibilité | Source | Unité | Parent |
|---|---|---|---|---|
procedure function |
public | FMX.Styles.pas FMX.Styles.hpp |
FMX.Styles | TStyleManager |
Description
Définit le style actif sur l'instance spécifiée par le paramètre Style.
Vous pouvez obtenir une instance de style en utilisant la méthode LoadFromResource, LoadFromStream ou LoadFromFile.
- Remarque : Si vous appelez la fonction SetStyle dans la section initialization d'une unité du fichier projet principal, avant
Application.Initialize, elle s'applique alors à l'ensemble des fiches.
Exemple
Ce code Delphi démontre comment utiliser le Gestionnaire de styles :
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.SetStyle(TStyleManager.LoadFromFile(od.FileName));
finally
od.Free();
end;
end;
Exceptions
Un appel à SetStyle peut déclencher l'exception suivante :
| Exception | Exception.Message | Scénarios |
|---|---|---|
|
L'argument ne doit pas être nil |
|