摘要:
//use Tlhelp32function GetProcessIDEx(List:TStrings; ProcessName: string = ''): TProcessEntry32;var ret: Boolean; processID: Cardinal; _processName: string; FSnapshotHandle: HWND; FProcessEntry32: TProcessEntry32;begin FSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0); FProce 阅读全文