Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Textfarbe eines Edit unter FMX anpassen geht nicht (https://www.delphipraxis.net/208799-textfarbe-eines-edit-unter-fmx-anpassen-geht-nicht.html)

bernhard_LA 15. Sep 2021 11:11

Textfarbe eines Edit unter FMX anpassen geht nicht
 
ich möchte abhängig von einer Checkfunktion die Textfarbe im Edit anpassen um dem Benutzer weitere Informationen zugeben ,
die VCL Variante funktionierte perfekt , unter FMX geht dieser analog entwickelte Code nicht .... :-)
die Textfarbe bleibt immer bei default scharz.




Delphi-Quellcode:

procedure ColorEditbyData(anyEdit: TEdit; aValue: string);
var
  warnLevel: Integer;
begin

  CheckParameter(aValue, warnLevel);

  case warnLevel of

    0:
      anyEdit.TextSettings.Font.FontColor := TAlphaColorRec.Green;

    1:
      anyEdit.TextSettings.FontColor := TAlphaColorRec.Blue;

    2:
      anyEdit.TextSettings.FontColor := TAlphaColorRec.Red;

  else

  end;

  anyEdit.Text := aValue;

end;

Uwe Raabe 15. Sep 2021 11:33

AW: Textfarbe eines Edit unter FMX anpassen geht nicht
 
Du musst bei StyledSettings noch das FontColor abwählen, sonst hat der Style Vorrang.

bernhard_LA 15. Sep 2021 12:13

AW: Textfarbe eines Edit unter FMX anpassen geht nicht
 
wie setze ich diese property zur Laufzeit ? Dieser Ansatz geht leider nicht ....


Delphi-Quellcode:
    anyEdit.StyledSettings.FontColor = False;

Uwe Raabe 15. Sep 2021 12:44

AW: Textfarbe eines Edit unter FMX anpassen geht nicht
 
Delphi-Quellcode:
  Edit1.StyledSettings := Edit1.StyledSettings - [TStyledSetting.FontColor];

bernhard_LA 15. Sep 2021 13:21

AW: Textfarbe eines Edit unter FMX anpassen geht nicht
 
danke , funktioniert :-)


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:32 Uhr.

Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf