Redefinir API ReadFile

[Jais]

Muchisimas gracias por la respuesta ecfisa, pero lo acabo de probar y no me funciona.

Asi es como lo he declarado:

Código Delphi [-]
type
TReadFile: Function(hFile:Cardinal;var lpBuffer: Pointer ;nNumberOfBytesToRead,lpNumberOfBytesRead:Cardinal;lpOverlapped: POverLapped): LongBool; StdCall;

Y me da error en el 2º parametro y el error que me pone es el siguiente:

Types of actual and formal var parameters must be identical

Saludos

[[escafandra]]

En realidad ecfisa tiene razón pues la declaración de las APIs que hace Microsoft son para C. El caso es que delphi hace alguna "trampilla sintáctica" y la declaración, para que te funcione con los mismos tipos de parámetros es la siguiente:

Código Delphi [-]
type
TReadFile = function(hFile: Cardinal; var Buffer; nNumberOfBytesToRead: Cardinal; var NumberOfBytesRead: Cardinal; lpOverlapped: POverLapped): LongBool;  stdcall;

Saludos.

[Jais]

Muchísimas gracias escafandra!! Lo he puesto como tu has dicho y ha funcionado perfectamente! Gracias!

Si ecfisa tenia razón porque así es exactamente como esta en la msdn, pero como dice escafandra, delphi hace alguna "trampilla sintáctica".

Muchísimas gracias a los dos por sus respuestas!!

Saludos