FMX - eigene Componente + Styling

[sintronic86]

Hallo zusammen ,

und wieder stoße ich mit FMX an meine Grenzen. Ich habe eine neue Komponente in meinem Package erstellt

Code:

TMyCalendar = class(TCalendar)

Diese soll bereits selbst einen anderen Style verwenden, welchen ich auch selbst erstelle.

Ich habe zum designen ein neues Projekt erstellt, ein StyleBook draufgezogen und damit die Standard-Klasse TCalendar designt. Das funktioniert auch super! Diesen Style dann aber direkt der Komponente in ihrem Package zuzuweisen klappt einfach nicht.
Bisher hab ich mit folgendem Ansatz gearbeitet:

Code:

function TMyCalendar.GetStyleObject(const Clone: Boolean): TFmxObject;
const
  LStyle = 'MyCalendarStyle';
begin
  if (StyleLookup = '') then begin
    Result := TControl(TStyleStreaming.LoadFromResource(HInstance, LStyle, RT_RCDATA));
    Exit;
  end;
  Result := inherited GetStyleObject;
end;

Der größte Unterschied zur Variante mit TStyleBook ist, dass hier das Root-Element bereits der Style für die Klasse sein muss, während in der Stylebook-Variante das Root-Element "nur" eine Art Container ist, der alle Style-Elemente enthält.
Ich hoffe ihr versteht was ich meine!?
Nun basiert mein Style aber viel auf einem PNG, welches die einzelnen Design-Elemente enthält. Ich weiß aber beim besten Willen nicht, wie ich das in diesem Scenario einbauen soll!

Ich bin für jegliche Hilfsansätze dankbar!