TROBSONMessage Memory Leak

Remoting SDK
1

DELPHI 12
ROSDK 10.0.0.1559

20240213112623
20240213112623975×395 115 KB

2

TROBSONElement = class(TCollectionItem)
// add, fix memory leak
destructor TROBSONElement.Destroy;
begin
if IsDocument or IsArray then
Clear;
inherited;
end;

3

test case:

uses  uROBSON;

procedure TForm1.Button1Click(Sender: TObject);
var FDocument: TROBSONDocument;
begin
  FDocument := TROBSONDocument.Create;
  try
    FDocument.AddDocument('FDoc');
    FDocument.AddArray('FArr');
    // FDocument.ItemByName('FDoc').Clear; // manual clear fix leak
    // FDocument.ItemByName('FArr').Clear; // manual clear fix leak
  finally
    FreeAndNil(FDocument);
  end;
end;
4

Logged as bugs://D19439.

5

bugs://D19439 was closed as fixed.