Browse Source

* ReadAllBytes was not reading all bytes. Fixes issue #40789

Michaël Van Canneyt 1 year ago
parent
commit
9eb77599e1
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/vcl-compat/src/system.ioutils.pp

+ 1 - 1
packages/vcl-compat/src/system.ioutils.pp

@@ -1991,7 +1991,7 @@ begin
   With OpenRead(aPath) do
     try
        SetLength(Result,Size);
-       ReadBuffer(Result,0);
+       ReadBuffer(Result,Size);
     finally
       Free;
     end;