在Delphi中操作Sap对象造成内存增长的原因

曾经在我的一个Delphi开发项目中，我遇到过这样一个问题，困扰了我相当一段时间。
我将SAP对象封装成了类，并在一个线程中调用。也就是说，SAP对象的创建释放全部是通过代码来操作的，不同于直接将SAP控件拖放到窗体上。

线程每执行一次SAP读写操作，内存就增长24K-32K。

关键代码
下面是SAP类的部分关键代码，含有SAP对象的创建和释放。

procedure TSapSvr.Open(FunctionName: string);
begin
  if fConnect.LogOn(0, True) then
  begin
    fFunctionName := FunctionName;
    fFunction := fSapFunctions.Add(FunctionName);
  end;
end;

procedure TSapSvr.Close;
begin
  fFunction := Unassigned;
  fSapFunctions.ReMoveAll();
  fConnect.LogOff;
end;

我就是在线程中不断的调用Open和Close函数，你能看出问题出在哪里吗？你肯定想不到的。

解决方案
我也是在无意中发现的，不过我现在还不知道原因，告诉你解决的方法吧！那就是将
fSapFunctions.ReMoveAll();

删除！！！
结束语
你能告诉我原因吗？

附件中我提供了我封装的SAP类，分享给大家，如果发现问题，请转送一份文件给我！