这是个什么错误Unable to expand？


我想给控件加一个像font那样的属性。就是前面有个加号点开后里面可以填的。但是现在点开后会报错Unable to expand？用的是类  TPosition = class {************************************************方位结构类}
    private
    { Private declarations }
      FLeft: integer; //左起点
      FTop: integer;  //右起点
      FWidth: integer; //长度
      FHeight: integer; //高度
      FAutoSize: Boolean; //自适应
    protected
    { Protected declarations }    public
    { Public declarations }
      //constructor Create;      //destructor Destroy(); override;
    published
    { Published declarations }
      property Left: integer read FLeft write  FLeft;
      property Top: integer read FTop write FTop;
      property Width: integer read FWidth write FWidth;
      property Height: integer read FHeight write FHeight;
      property AutoSize: Boolean read FAutoSize write FAutoSize;
    end;constructor TPosition.Create;
begin
  FLeft := 0;
  FTop := 0;
  FWidth := 0;
  FHeight := 0;
  FAutoSize := False; 
end;destructor TPosition.Destroy;
begin  inherited;
end;
......
    FPicturePoistion: TPosition; //图片位置......
    property PicturePoistion: TPosition read FPicturePoistion write FPicturePoistion;constructor TSpreadPanel.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);  FPicture := TPicture.Create();
  FPicturePoistion := TPosition.Create;
  
  //初始化各值
  Color := RGB(234, 247, 255);
  DrawBorder := True;
  BevelOuter := bvNone;
  BorderColor := clBackground;  Repaint;
end;destructor TSpreadPanel.Destroy;
begin
  FPicture.Free;
  FPicture := nil;  FPicturePoistion.Free;
  FPicturePoistion := nil;
  
  inherited;
end;