In Delphi 12 on the Linux platform, line (4832) Map := Mmap(nil, DumpSize, PROT_READ, MAP_SHARED, Mem, $000C0000); raises the error: Project [vdso] raised exception class ERangeError with message 'Range check error'.

edit :
I changed the function declaration from:

function mmap(Addr: Pointer; Len: NativeUInt; Prot: Integer; Flags: Integer; FileDes: Integer; Off: LongInt): Pointer; cdecl; external libc name _PU + 'mmap';
to:

function mmap(Addr: Pointer; Len: NativeUInt; Prot: Integer; Flags: Integer; FileDes: NativeUInt; Off: LongInt): Pointer; cdecl; external libc name _PU + 'mmap';

The code on line 4881 was changed from:

CheckSum: Byte; to:
CheckSum: Integer;

And the code on line 4900 was changed from:

if CheckSum <> 0 then
to:
if (CheckSum mod 256) <> 0 then

-----------SOLVED