定义控件
type
  TDtm= class(TWincontrol)
  private
    DateCalendar: TCalendar;——这是TWincontrol的子类
    monthCmbBox: TComboBox;——这是Twidgetcontrol的子类
………………
constructor TDtm.Create(AOwner: TComponent);
begin
……
  DateCalendar:=TCalendar.Create(self);
  DateCalendar.Parent:=self;
……
  monthCmbBox:=TComboBox.Create(self);
  monthCmbBox.Parent:=self;
……
end;
……安装控件后会,再拖到一个form上会出现control''has no parent window
这是什么原因。我试过去掉monthCmbBox之后,没有了这个问题,一切正常。
所以认为原因大概是出在monthCmbBox上面
是不是monthCmbBox、DateCalendar、TDtm= class(TWincontrol)的父类的问题?

解决方案 »

  1.   

    monthCmbBox.Parent:=self;???
    Parent在哪里,你做了吗?
      

  2.   

    最好在override CREATE的时候写入
    parent:=self;
    这样就不会有这种鸟现像了..
      

  3.   

    monthCmbBox: TComboBox;——这是Twidgetcontrol的子类它的parent要求是Twidgetcontrol,而self是TWincontrol,显然不行,
    你是不是用错的控件,用了clx的控件,应该是用vcl控件
      

  4.   

    请问citytramper(阿琪)
    按照你的办法,具体应该怎么操作呢?
      

  5.   

    你的包含的单元里是不是有QStdCtrls  改成StdCtrls