小弟自定义了一个组件是从TGRAPHICCONTROL继承下来的,自已加上了PICTUREN属性。
,但是创建时显示内存报错,代码如下:PICTURE的定义
   PROPERTY PICTURE:TPICTURE READ FPICTURE WRITE SETPICTURE;
注册属性编辑器:
   REGISTERPROPERTY(TYPEINFO(TPICTURE),MYGR,‘PICTURE‘,TPICTUREPROPERTY)大家帮忙啊!

解决方案 »

  1.   

    怪事 CSDN的帖子今天不能正常显示?还是我的机子有问题???
      

  2.   

    //不是属性注册的问题,是因为FPICTURE对象没有创建.
    // 重载create, destory 函数;
    public
      constructor Create(AOwner: TComponent); override;
      destructor Destroy; override;....constructor TGraphicControl1.Create(AOwner: TComponent);
    begin
      inherited;
      fpicture := Tpicture.Create;
    end;destructor TGraphicControl1.Destroy;
    begin
      fpicture.Free;
      inherited;
    end;// 至于注册函数,因为delphi自己已经注册,所以你不注册也可以,如果注册的话,放在register函数中.procedure Register;
    begin
      RegisterPropertyEditor(TypeInfo(TPicture), nil, 'PICTURE', TPictureProperty);
      RegisterComponents('Samples', [TGraphicControl1]);
    end;