Ayuda con rutina

[MaxiDucoli]

Hola.
Ando necesitando la ayuda de un experto o de nivel avanzado para poder hacer funcionar esta rutina que tengo acá en el link de abajo y que tiene tantas conversiones y cosas de más, que no entiendo.

En Delphi 7 funciona bien, pero uso Delphi 10.2 y no logro hacerla funcionar. Tampoco la entiendo mucho, ya que la hizo un amigo que recién empezaba a programar hace 22 años y así quedó hasta hoy.

Les dejo el link con el RAR para quien pueda revisarla y dentro del RAR está la rutina (un pas) y un archivo para poder probarla (un bin)
Se ingresa ruta de destino de archivo descomprimido, ruta de archivo con los datos a descomprimir y el offset.

En este caso el offset del archivo BIN es 16.

Con eso en Delphi 7 lo hace, pero acá me da el error que muestro en la imagen.

https://drive.google.com/file/d/1YMi...ew?usp=sharing

Acá el link: https://drive.google.com/file/d/1z91...8sy68vTGUSFpMs

Esto es para la edición de un juego de Playstation, que hace 22 años venimos editando y solo por nostalgia lo seguimos haciendo.


Si alguien me puede ayudar, se lo agrezco.