AYUDA CON DLL Y ARREGLOS

[Busmatic_wpb]

Buenas tardes amigos haber quin me puede guiar con esto que la verdad no entiendo.

Tengo este

dataRead: array[0..15] of Byte; es delphi
Bloque: Byte;

Seria asi dataRead:= {" "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," ",}
Bloque:= 0
frHandle:=0

fretcode := ACR120_Read(frHandle, Bloque, @dataRead)
:::::


DLL FUNCTION ACR120_Read(frHandle AS LONG, Bloque AS LONG, @dataRead AS LPSTR) AS LONG PASCAL FROM "ACR120_Read" LIB ACR120libHandle

Como pasaria al llamado para la funcion con una arrelgo a llamado a la funcion ACR120_Read
y saber un poco mas de este tipo de manejo de datos

LPSTR WORD PTR LONG BYTE STRING VOID _INT

Agradeceria mucho quien me pueda iluminar gracias desde ya.

[Antonio Linares]

Oscar,

dataRead := Space( 16 )


..., @dataRead AS PTR ) ...

[Busmatic_wpb]

Gracias estimado por contestar

Entonces el llamado quedaria

Seria asi dataRead:= ( 16 )
Bloque:= 0
frHandle:=0

fretcode := ACR120_Read(frHandle, Bloque, @dataRead)
:::::

DLL FUNCTION ACR120_Read(frHandle AS LONG, Bloque AS LONG, @dataRead AS PTR ) AS LONG PASCAL FROM "ACR120_Read" LIB ACR120libHandle

El parametro AS LONG PASCAL SERIA CORRECTO

Entonces cuando se usa LPSTR
Muchas Gracias..

[Antonio Linares]

> Entonces cuando se usa LPSTR

Cuando suministramos una cadena como parámetro que no va a ser modificada

[Busmatic_wpb]

Estimado.
Muy agradecido.

[Busmatic_wpb]

Buenas Tardes.
Muy agradecido por tus respuestas.

Haber esta.
El $ en Pascal es como el 0x en C, y significa que a continuación hay un número en hexadecimal.

Por ejemplo, en Pascal escribir $FF es lo mismo que 255.
En C, 0xFF es 255.

Ahora necesito crear una cadena donde necesito mandar una cadena a una
algo seria

lOCAL pKey:="$FF$FF$FF$FF$FF$FF$FF"

fretcodeLogin := ACR120_Login(frHandle, Sector, ACR120_LOGIN_KEYTYPE_A, Campovar, @pKey)

Quien me puede ayudar si existe alguna funcion para convertir 255 a hexadecimal agradezco cualquier ayuda por favor.
desde ya gracias..

[Antonio Linares]

lOCAL pKey:= Replicate( Chr( 255 ), 7 )

[Busmatic_wpb]

Gracias .
Intentare haber como lo logro
Oscar Chacon.