我使用TCustomControl作为基类写了一个小控件,编译成功,也能放在组件板上,但当我点击这个小控件试图把它放在Form上时出现报错“control '' has no parent window”。那位大侠能帮忙解决这个问题!!!(200分)

解决方案 »

  1.   

    constructor TXXXXX.Create(AOwner: TComponent);
    begin
      inherited Create(AOwner);//查看你的控件中是否忘了这一行?
    end;
      

  2.   

    有“inherited Create(AOwner);”呀
      

  3.   

    把控件发过来,我帮你看看。[email protected]
      

  4.   

    控件给你发出到“[email protected]
      

  5.   

    帮你改好了,你这个控件是干什么用的啊,我还真不会用。去信箱看看,我发回给你了。修改了Create,在最后面有附带说明。
      

  6.   

    帮你改好了,你这个控件是干什么用的啊,我还真不会用。去信箱看看,我发回给你了。修改了Create,在最后面有附带说明。
      

  7.   

    帮你改好了,你这个控件是干什么用的啊,我还真不会用。去信箱看看,我发回给你了。修改了Create,在最后面有附带说明。
      

  8.   

    谢谢!可我没收到,能用这个地址再发一次吗。“[email protected]
      

  9.   

    哦,改动不大,我在这告诉你
    把Create里的这3句删掉;
      //Clear;
      //RePaintGridBMP;
      //RePaintValuesBMP;
    写到这里来,在Show里写也可以。说明,你下面的操作都和Paint有关,还没Create怎么paint啊,因此,要放在这里处理,不能在Create中做
    protected
        procedure CreateWnd; override;  procedure TMovGraph.CreateWnd;
    begin
      inherited;           
      Clear;
      RePaintGridBMP;
      RePaintValuesBMP;
    end;
      

  10.   

    亲爱的miky:
        我的这个控件如果用TGraphicControl作基类就没有问题,但TGraphicControl不支持
    Handle属性,在用鼠标拖出一个图形框以备复制时会出现乱线。这是我为一个工控系统开发
    的动态波形显示控件,希望与你共享。谢谢你的帮助!!!!