Últimos Temas de: Shackles

Buenas tardes.
Me he encontrado con un problema a la hora he reemplazar el rtlmovememory en una cierta funccion. En otras si me funciona correctamente, creo que es porque trato de mover 8bytes. (El resto fueron 4)

Código:

Private Sub RTL(ByVal dest As Long, ByVal src As Long, ByVal lLen As Long)
Dim i As Long
For i = CLng("0") To lLen - CLng("1")
    bvHack(dest + i - lHackDelta) = bvHack(src + i - lHackDelta)
Next i
End Sub

Las declaraciones de bvHack y tal estan declaradas. Solo que no hace falta pegar mas codigo.

Este es el que trato reemplazar.

Código:

RtlMoveMemory c(i), b(i * 8), 8

Lo pongo asi.

Código:

RTL varptr(c(i)), varptr(b(i * 8)), 8

y nada, tambien he probado asi:

Código:

RTL c(i), b(i * 8), 8

Saludos y gracias de antemano.