Иногда требуется добраться до свойства, которое недоступно на том основании, что на него установлен доступ protected. В VCL эта необходимость возникает довольно часто при попытке  реализовать групповую обработку объектов разных классов, имееющих одного предка. Например, есть список (TList) совершенно различных элементов управления, у которых нужно поменять  Color. Идея вроде бы понятна - привести к общему базовому классу  TControl и установить нужное значение. Но тут возникает препятствие: до свойства Color добраться нельзя - оно protected. Решение состоит в том, чтобы создать производный класс с открытым Color. Это несколько незаконно, но работает. В примере предполагается, что в списке все объекты строго являются экземплярами классов, производных в конечном счете от TControl.
Исходный код:

void __fastcall TMyForm::SetColor(TList* List,TColor Color) { class TPublicColorControl : public TControl { public:     property Color; };   for (int i = List->Count; i--; )    {        TPublicColorControl* Control = reinterpret_cast<TPublicColorControl*>(List->Items[i]);        Control->Color = Color;    } }