strls:string;
inc(strls.RefCount);有什么作用呀?

解决方案 »

  1.   

    RefCount是共享对象的引用计数,而且是不能修改的
    我不明白你的代码,能不能贴的全一点
      

  2.   

    下载了delphi5开发人员指南,有一段文字如下,但在String型变量中查不到RefCount函数,不知是什么意思?这段代码是下列伪代码的具体体现:
    procedure ShowVariant(strls:string);
    var
      v:Variant;
    begin
    清除变量V,确保它初始化为“空”;
      try
        v.VType:=varString;v.VString:=strls;Inc(strls.RefCount);
    清除变量V,释放对字符串strls的引用
        v.VType:=varInteger;v.VInteger:=34;
      finally
    // 现在清除和v a r i a n t有关的资源
      end;
    end;