FMX TEDIT Hintergrundfarbe wechseln

[arnof]

Ich habe mal eine echte Beginner Frage (XE6):

FMX TEDIT, wie wechselt man denn dort die Hintergrundfarbe ?

.Color gibt es ja nicht.


Auch ein anderes Beispiel was ich gefunden habe:

Delphi-Quellcode:

procedure SetEditControlColor(AEditControl: TCustomEdit; AColor: TAlphaColor);
 var
  T: TFmxObject;
begin
  if AEditControl = nil then   Exit;
  T := AEditControl.FindStyleResource('background');
  if (T <> nil) and (T is TRectangle) then
     if TRectangle(T).Fill <> nil then
        TRectangle(T).Fill.Color := AColor;
  AEditControl.Repaint;
end;

geht nicht da T <> TRectangle ist

T ist hier ein TActiveStyleObject ???