Delphi/delphimvcframework
1
0
Fork 0
mirror of https://github.com/danieleteti/delphimvcframework.git synced 2024-11-16 00:05:53 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Merge pull request #73 from ezequieljuliano/master

Browse Source 
Problem solving with memory leak when reading request body.
This commit is contained in:
Daniele Teti 2017-02-24 14:14:49 +01:00 committed by GitHub
commit 2830fef1b7
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
sources/MVCFramework.pas
View File

@ -1646,7 +1646,8 @@ var
begin begin
if (FBody = '') then if (FBody = '') then
begin begin
{$IFDEF BERLINORBETTER} Encoding := nil;
{$IFDEF BERLINORBETTER}
if (FCharset = '') then if (FCharset = '') then
begin begin
SetLength(Buffer, 10); SetLength(Buffer, 10);
@ -1675,6 +1676,8 @@ begin
Encoding := TEncoding.GetEncoding(FCharset); Encoding := TEncoding.GetEncoding(FCharset);
FBody := Encoding.GetString(Buffer); FBody := Encoding.GetString(Buffer);
{$ENDIF} {$ENDIF}
if Assigned(Encoding) then
Encoding.Free;
end; end;
Result := FBody; Result := FBody;
end; end;