即在窗口一创建时我的edit的text也为空?

解决方案 »

  1.   

    你重载构造函数,在里面加入
    self.text := '';
      

  2.   

    interfacetype
      TEmptyEdit=class(TEdit)
        private
        public
          constructor Create(AOwner:TObject);
      end;implement
    ....
    constructor TEmptyEdit.Create(AOwner:TObject);
    begin
      Inherited;  //一定要放到第一行
      Text:='';  
    end;编译单元创建可视控件,然后拖动就可以了!呵呵,我没有试验过,楼主自己按照这个思路进行就可以了.......
      

  3.   

    楼上二位,我就是如同你们所说的,但不行。拖到窗口上时text为numEdit。
      

  4.   

    你不会把TEdit改了。这样更快更好做
      

  5.   

    怎么可能,我的意思是从TEdit(最好是TCustomEdit)派生一个子类,然后编译成控件单元,然后添加到IDE的面板上。但新派生控件对应的类构造器中一定要在代码最后令Text为空....FText:='';
      

  6.   

    你可以直接在EDIT的属性里面设置,将其清空