2008年6月10日
判断程序是否正在运行
摘要： function IsRuning(const AObjectName: string): Boolean;{AObjectName='aaa.exe'} var lppe : TProcessEntry32; sshandle: Thandle; found: boolean; begin Result := False; sshandle := CreateToolhelp... 阅读全文
posted @ 2008-06-10 12:03 sonicit 阅读(1114) 评论(0) 推荐(0) 编辑