摘要: //需要引用tlhelp32单元//查找进程function findProcessId(pname:string):Cardinal; var hsnapshot:THandle; lpe:TProcessEntry32; found:Boolean; begin Result:=0; if pname'' then begin hsnapshot:=Cre... 阅读全文
posted @ 2013-06-26 16:09 胖达没有海 阅读(728) 评论(0) 推荐(0) 编辑