Wie kann man in Delphi Extension-DLL den Dunkel- oder Hellmodus abfragen

[mattia72]

Ich hab's gefunden:

Delphi-Quellcode:

   var
      themingServices : IOTAIDEThemingServices;

   if Supports(BorlandIDEServices, IOTAIDEThemingServices, ThemingServices) then begin
      Result := themingServices.ActiveTheme;
   end;

Dark oder Hell wird zurückgegeben.