在VCL元件中, 有很多property或Method宣告在protected區, 必須透過繼承才能使用, 然而繼承後之新元件除非安裝至元件盤, 無法在DesignTime使用. 有時我們只須一些簡單的property    以下以DBGrid之FixedCols為例,設定DBGrid不可捲動之Columns     

typedef
class TTmpGrid : public TDBGrid  //宣告class繼承TDBGrid
{
public:
  __property  FixedCols;//FixedCols為TCustomGrid之protected property
                        //於此將其改為public
}TGrid;    void __fastcall TForm1::Button1Click(TObject *Sender)
{
  (TGrid *)DBGrid1->FixedCols=2; //DBGrid1 Cast成TGird *後可直接用其FixedCols
}

[NOTE] 1. Delphi中Class內之public,protected等定義其"可見度"是以unit為單位,故同樣之做法在Delphi中只須在此unit內宣告如下即可 TTmpGrid =class(TDBGrid); //不須加 public: property FixedCols; BCB之class"可見度"則是以class為base 2. 可直接Cast不須用新class重新construct, 乃因為Class之內容並無任何改變, 只是可見度變了 3. 如此繼承,如果加入了額外的變數, Compiler也不會告訴你錯誤,實際也沒錯誤, 此時若未用新class重新construct, memory就會錯了.

為什麼我執行這個程式會發生error，error 如下: [C Error] odbookin.h(26): E2459 VCL style classes must be constructed using operator new [C Error] odbookin.h(26): E2125 Compiler could not generate default constructor for class 'TTmpGrid' [C Error] odbookin.cpp(146): E2188 Expression syntax