我想你应该从TCustomEdit来继承,而不是从TEdit.

解决方案 »

  1.   

    从TCustomEdit 继承过来,和 TEdit没有太大的不同,
    只是TEdit把TCustomEdit中的一些Protected 和 Public方法属性,发布了一下(Published)
    如果某些属性,你不希望在Object Inspector里面看到,则不给予发布就行了。
    或者用protected 重新声明就可以了。
      

  2.   

    不知道object pascal有没有私有继承?
      

  3.   

    或者你可以用组合的方法,将TEdit作为新类一个私有成员,选择的导出某些接口
      

  4.   

    这样就差不多了:
    protected
        property Text;不过别人还是可以TEdit(YouClass).Text这样来访问,即使是从TCustomEdit继承也可以这样。
      

  5.   

    同意GoodHope(好望角) 。
    不过你可以从TComponent继承一个类,然后在private声明一个TEdit,在published发布自己定义的属性,通过自己定义的读写方法操作。
    type TMyEdit = class(TComponent)
    private
      Edit:TEdit ;
      procedure SetText(Value:string);
      function GetText:string;
    published
      Text :string read GetText write SetText;
    ...