TStyleManager.ActiveStyle ermitteln?

[HCB]

Hallo alle zusammen,
ich wünsche Euch allen ein gesundes und friedliches Neues Jahr!

Auch jetzt am ersten Tag suche ich nach einer Lösung. Mir ist es bis jetzt nicht gelungen, den aktuell aktiv gesetzten Design-Style zu ermitteln.
Was ich gefunden habe ist das hier:
TStyleManager.ActiveStyle (class property ActiveStyle: TCustomStyleServices read GetActiveStyle)

Ich möchte auslesen, welcher Stil gerade aktiv ist.
Mit if IsCustomStyleActive then showMessage('Kunde') else showMessage('Standard'); kann ich nur feststellen, oder der Standard Windows Stil oder ein benutzergesetzter Stil verwendet wird, eben aber nicht welcher genau.

Kann mir jemand bitte sagen wie ich das gelöst bekomme?
Vielen Dank.

LG Harry