Delphi-Quellcode:
uses
...
Themes;
procedure TfrmDesign.FormShow(Sender: TObject);
begin
ThemeServices.OnThemeChange := ThemeChanged;
end;
procedure TfrmDesign.ThemeChanged(Sender: TObject);
begin
ShowMessage('Design wurde geändert.');
end;
Damit hat sich das Thema (für mich) wohl erledigt.
Immer gut wenn man (mehr oder weniger) selbst drauf kommt - nur blöd wenn das nicht vor dem Foreneintrag passiert.
Naja...
*closed*
PS:
Hinweis: Der Code ist wohl erst ab Delphi 7 nutzbar.