Пытаюсь внедрить свойство DrawingStyle в класс TListView

// Добавляем вот это
namespace MyNamespace
{
    class TDBGrid : public Dbgrids::TDBGrid
    {
    protected:
        DYNAMIC void __fastcall ColWidthsChanged(void)
        {
            Dbgrids::TDBGrid::ColWidthsChanged(); // Вызываем метод предка, т.е., Дельфиским синтаксисом - Inherited
            DefaultRowHeight = 50;
        }
 
    public:
        inline __fastcall virtual TDBGrid(Classes::TComponent* AOwner) :
            Dbgrids::TDBGrid(AOwner) {}
        __property DefaultRowHeight; // Теперь доступ к свойству - общий
    };
};
#define TDBGrid MyNamespace::TDBGrid

namespace MyListView
{
    class TListView : public ComCtrls::TListView
    {
    
 
    //а что здесь писать?
 
             public:
        inline __fastcall virtual TListView(Classes::TComponent* AOwner) :
            ComCtrls::TListView(AOwner) {}
        __property DrawingStyle; // Теперь доступ к свойству - общий
    };
};
#define TListView MyListView::TListView

ListView1->Columns->Add();
    ListView1->Columns->Add();
    ListView1->Columns->Add();
    ListView1->Columns->Items[0]->Width = 0;
    ListView1->Columns->Items[1]->Caption = L"Состояние сети";
    ListView1->Columns->Items[1]->Width = 100;
    ListView1->Columns->Items[1]->Alignment = taCenter;
    ListView1->Columns->Items[2]->Caption = L"Дата/Время";
    ListView1->Columns->Items[2]->Width = 128;
    ListView1->Columns->Items[2]->Alignment = taCenter;
    ListView1->DrawingStyle = gdsGradient;
    ListView1->GradientStartColor = clBlue;
    ListView1->GradientEndColor = clAqua;