COM GetOleString()

                            
通过      GetOleStrings      可以把一个   TStrings   构造成一个实现IStrings的com对象,   
  但在GetOleStrings的代码里(axctrls.pas)   创建了个StringAdapter对象,    
      Strings.StringsAdapter   :=   TStringsAdapter.Create(Strings);  
   
  问题是,    
  在TStrings的析构函数里并没有调用   Free(),    
  只是   StringAdapter   :=   nil;  
   
  请教高手这样有没有问题?  
 

查看回复