在TEdit对象中内建一个TStringGrid对象,让它和外部的TStringGrid捆绑在一起。在外部的TStringGrid删除时,如何解除TEdit中内建的TStringGrid和外部的TStringGrid捆绑关系。

解决方案 »

  1.   

    设置为nil,是不可以的。在外部的TStringGrid删除后,点击TEdit对象,拖动属性窗体,刷新对象属性值时,报错!
      

  2.   

    现将部份代码列出:Type 
        TCusEdit = class(TEdit)
          private
            ...
            CusStringGrid    : TStringGrid;
            ...
            procedure SetStringGrid(Value:TStringGrid);
          published
            ...
            property StringGrid:TStringGrid read CusStringGrid write SetStringGrid;   
            ...
          end;implementationprocedure TCusEdit.SetStringGrid(Value:TStringGrid);
    begin
      if Value<>nil then
      begin
        CusStringGrid:=Value;
      end;
    end;
      

  3.   

    CusStringGrid:=Value;
    这个是传递的指针;
    推荐采用
    cusstringrid.assign(value);看看还有没有问题;
      

  4.   

    采用assign方法不对。在等待........