[VCL] (Jv)StringGrid vs Windows Design

[Root2k]

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.