private
   { Private declarations }
    tempdataset:TADOQuery;
    tnode : TTreenode;
    RdoFlag:Boolean;
    procedure SetdoFlag(aValue:Boolean);
 published
    property doFlag:Boolean read RdoFlag write SetdoFlag default True;
为什么在表单设计器Object Inspector的属性框中看不到。