date: 6/17/2000
versions: vb4/32 vb5 vb6 level: intermediate
author: the vb2themax team
private declare sub copymemory lib "kernel32" alias "rtlmovememory" (dest as _
any, source as any, byval bytes as long)
' read a byte from memory
function peekb(byval address as long) as byte
copymemory peekb, byval address, 1
end function
' read an integer from memory
function peeki(byval address as long) as integer
copymemory peeki, byval address, 2
end function
' read a long value from memory
function peekl(byval address as long) as long
copymemory peekl, byval address, 4
end function