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 |
|