Closed Rura1980 closed 10 years ago
Hi!
It seems that TZMQMsg destructor leaks memory, because it does not free TZMQFrame elements from msgs list:
destructor TZMQMsg.Destroy; begin msgs.Clear; msgs.Free; inherited; end;
Maybe it should be changed to
destructor TZMQMsg.Destroy; var i: Integer; begin for i := 0 to msgs.Count - 1 do TZMQFrame(msgs[i]).Free; msgs.Clear; msgs.Free; inherited; end;
Hi!
It seems that TZMQMsg destructor leaks memory, because it does not free TZMQFrame elements from msgs list:
destructor TZMQMsg.Destroy; begin msgs.Clear; msgs.Free; inherited; end;
Maybe it should be changed to
destructor TZMQMsg.Destroy; var i: Integer; begin for i := 0 to msgs.Count - 1 do TZMQFrame(msgs[i]).Free; msgs.Clear; msgs.Free; inherited; end;