mirror of
https://github.com/danieleteti/delphimvcframework.git
synced 2024-11-16 00:05:53 +01:00
Merge pull request #73 from ezequieljuliano/master
Problem solving with memory leak when reading request body.
This commit is contained in:
commit
2830fef1b7
@ -1646,7 +1646,8 @@ var
|
||||
begin
|
||||
if (FBody = '') then
|
||||
begin
|
||||
{$IFDEF BERLINORBETTER}
|
||||
Encoding := nil;
|
||||
{$IFDEF BERLINORBETTER}
|
||||
if (FCharset = '') then
|
||||
begin
|
||||
SetLength(Buffer, 10);
|
||||
@ -1675,6 +1676,8 @@ begin
|
||||
Encoding := TEncoding.GetEncoding(FCharset);
|
||||
FBody := Encoding.GetString(Buffer);
|
||||
{$ENDIF}
|
||||
if Assigned(Encoding) then
|
||||
Encoding.Free;
|
||||
end;
|
||||
Result := FBody;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user