Problem mit TControl.Color

[shmia]

Delphi-Quellcode:

type
  TControlCracker=class(TControl);
var 
  x: TControl; 
begin 
  // der Trick: protected Properties werden so zugänglich
  TControlCracker(x).color := clBlue;