Comment modifier par programmation la FontColor d'un Tlabel

Quand je mets un TLabel sur un formulaire, je peux changer la couleur de son texte en changeant le FontColor de la propriété. Cependant, quand je fais cela dans mon programme en

Label1.FontColor := TAlphaColors.Aquamarine;

cela ne fonctionne pas. Aucune idée de quel est le problème?

FireMonkey est pas du tout comme ça. Vous avez besoin de connaître les styles. Commencer avec le programme docs.
Vous devez exclure le ssFontColor le style de l'étiquette de la style set, sinon la couleur de la police de la attribué style sera appliqué à l'étiquette. (si on utilise la même logique que dans Delphi XE3)
Vous devez être à la recherche à des pages différentes. TLama les liens et les pages que j'ai trouvées étaient claires. Docs pour fmx sont un peu louche si je suis d'accord
Je préfère laisser cette réponse de quelqu'un de connu ou au moins quelqu'un qui a Delphi XE5. Je vais être en silence en attendant au moins 1 ou 2 ans avant que je commence à penser, à écrire quelque chose de sérieux sur FMX 🙂
J'ai été de sauter à des conclusions un peu trop vite. De modifier par programmation la FontColor les ouvrages suivants: FText.StyledSettings := FText.StyledSettings - [TStyledSetting.ssFontColor]; FText.FontColor := TAlphaColors.Cyan; (où FText est un TLabel). Les docs avec la redoutable Embarcadero manque d'effort dans la documentation sur FontColor. TLama la réponse de lien ont été la bonne. Grâce à deux TLama et David pour leur aide et leur persistance 😉

OriginalL'auteur Arnold | 2014-02-02

  1. 3

    Pour permettre la modification de la couleur de la police d'un TLabel objet, vous avez besoin de changer son StyledSettings propriété.

    C'est un tableau définissant les différents paramètres qui sont définis par le style actuel et ne peut pas être modifié par d'autres moyens.

    Pour être en mesure de modifier la couleur de la police, vous devez supprimer le TStyledSetting.FontColor entrée à partir de ce tableau.

    Vous pouvez le faire par programmation avec

    Label1.StyledSettings := Label1.StyledSettings - [TStyledSetting.FontColor];

    ou de l'Inspecteur d'Objets dans le concepteur, sélectionnez votre label, aller dans StyledSettings et décocher FontColor.

    D'autres paramètres qui peuvent être résolus par le style actuel sont

    • TStyledSetting.Family
    • TStyledSetting.Size
    • TStyledSetting.Style
    • TStyledSetting.Other

    Donc, pour être en mesure de modifier la couleur de police et la taille, vous devrez écrire:

    Label1.StyledSettings := Label1.StyledSettings - [TStyledSetting.FontColor, TStyledSetting.Size];

    OriginalL'auteur Nicolas Dusart

  2. 1

    Sous un TLabel pour TText de Contrôle. problème résolu !

    Que voulez-vous dire exactement?
    J'ai rencontré le même problème où la Couleur n'était pas coller pour TLabels. Au lieu d'un à l'aide d'un TLabel, utiliser un TText de Contrôle. Vous pouvez coder quelque chose comme: 'MyText.Couleur := TAlphaColors.Dodgerblue;'
    Permet d'éviter les feuilles de style et etc.
    Merci pour la mention de cette solution, ne le savait pas. De toute façon, mon problème avec TLabel a été résolu par TLama et mentionné dans mon commentaire.

    OriginalL'auteur ThisGuy

  3. 0

    J'ai juste essayé la réponse de @NicolasDusart et découvert, qu'une TLabel ne semble pas avoir StyledSettings. Je suppose que cela a changé dans les nouvelles versions de Delphi, je suis actuellement à l'aide de Delphi Tokyo. Cependant, avec ce que j'étais capable de changer la couleur de police:

    Label1.StyleElements := Label1.StyleElements - [seFont];

    Delphi documentation listes TStyleElements comme jeu:

    type TStyleElements = set of (seFont, seClient, seBorder);

    Vcl.Les contrôles.TStyleElements

    OriginalL'auteur pskiebe