Verständnisprobleme mit FMX

[Ookami]

Hallo Harry,

erst mal danke, ich hab's jetzt noch ein bisschen anpassen müssen,

Code:

  canvas.BeginScene;
  canvas.Fill.Color := MainForm.EvenRowColor;
  canvas.FillRect(Arect, 1,1, AllCorners,1);
  Canvas.Font.Family := Fontname;  (weil ich doch den Font anpassen muss)
  Canvas.Font.Style  := FontStyle;
  Canvas.Font.Size   := FontSize;
  canvas.Fill.Color  := FontColor;
  canvas.FillText (ARect, TText (Sender).Text, True, 1, [], TTextAlign.Center, TTextAlign.Center);
  canvas.EndScene;

und was soll ich sagen, es läuft ... zumindest bis ich die Fonteinstellungen wechsle.
dann bin ich wieder soweit wie bisher.
Für den Fall 1 läuft es, für Fall 2-6 nicht. Wieder zurück auf Fall 1 geht wieder.
Bei Fall 1..6 handelt es sich nur um verschiedene Texte, bzw. Font-Einstellungen.
Beispiel Fall 1: Text = 'Hallo Welt', Font=Arial, Size=24, Style=[], ... usw., eigentlich nichts dramatisches.


und gleich nochmal danke, in der Zwischenzeit hast du ja gleich nochmal geantwortet. jep, ein Teil des Fauxpas ist mir aufgefallen.
Der wirklich wichtige (canvas.Fill.Color := Color vor jedem Schritt der zeichnet aber nicht. Danke auch hierfür