VC6模仿xuetr遍历目标进程的所有模块路径和基址到列表框

逍遥公子

VC6实现像xuetr那样模块的遍历，并且显示到列表框上。
字符串填充如下。
char  myb[260];        //字符数组就是字符串
sprintf(myb,"模块基址0x%08X 基址大小0x%08X 模块名%s 模块路径%s  ",
                  me32.modBaseAddr,
                  me32.modBaseSize ,
                  me32.szModule,
                  me32.szExePath);   //转化的结果保存到字符串myb
       List ->AddString(myb); //调用这个类对象指针 中的函数AddString来添加字符串

void CMyDlg::OnButton1()
{

       List=(CListBox*)GetDlgItem(IDC_LIST1);//实例化这个类对象指针 List
        DWORD ProId_1;
        char mystr[260];//声明一个字符串变量qq
GetDlgItemText(IDC_EDIT1 ,mystr,260);//获取 编辑框上的内容 保存到mystr这个字符串变量里面

        ProId_1=EnumProcess(mystr);//依据进程名来获取进程的PID值

    ListProcessModules(ProId_1);//依据此进程的PID值来遍历它的所有模块

}

http://pan.baidu.com/share/link?shareid=515799&uk=3895950538