Dark Theme aber nur die Farben

[Sherlock]

Ok, das sind Delphi-VCL-Themes. Aber wie sieht das mit Windows-Systemfarben aus? Das weiter oben erwähnte clButtonFace. Man muss der Anwendung doch "nur" beipulen, daß sie alle Controls an die neuen Systemfarben anzupassen hat, sobald dieses Event

Delphi-Quellcode:

procedure TForm1.WMSettingChange(var Message: TWMSettingChange);
begin
  if SameText('ImmersiveColorSet', String(Message.Section)) then
    // statt HandleThemes; sollte hier entsprechend Themeless reagiert werden
end;

ausgelöst wurde.