readmem 单元
于 2022-06-01 发布
文件大小:1.84 kB
0 46
下载积分: 2
下载次数: 1
代码说明：
unit ReadMem interface uses TLHelp32,Windows function GetMems(PID:longword baseaddress:string= len:integer=0):string //获取指定进程中的～内存数据 implementation function UpperCase(const S: string): string var Ch:Char L:Integer Source,Dest: PChar begin L := Length(S) SetLength(Result, L) Source := Pointer(S) Dest := Pointer(Result) while L 0 do begin Ch := Source^ if (Ch >= a ) and (Ch
下载说明：请别用迅雷下载，失败请重下，重下不扣分！
发表评论
