pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-11-23 21:34:53 +02:00
Code Issues Actions Releases Activity

Lazarus/FPC compatibility fix.

Browse Source
This commit is contained in:
Salvador Díaz Fau
2018-10-04 21:24:59 +02:00
parent 1624d8712d
commit 2b37fa289f
1 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/uCEFWriteHandler.pas
View File

@@ -350,7 +350,11 @@ begin
try try
EnterCriticalSection(FCriticalSection); EnterCriticalSection(FCriticalSection);
TempTotal := max(size, FGrow); if (size < FGrow) then
TempTotal := FGrow
else
TempTotal := size;
inc(TempTotal, FBufferSize); inc(TempTotal, FBufferSize);
ReallocMem(FBuffer, TempTotal); ReallocMem(FBuffer, TempTotal);