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:Inte