[Pyro]

вот это возвращает processid, как получить threadid не помню, ищи гугл

PHP код:

uses TLHelp32;

function PID(ExeName: string): Cardinal;
var
  FSnapshotHandle: THandle;
  FProcessEntry32: TProcessEntry32;
  ContinueLoop: Boolean;
begin
  result := invalid_handle_value;
  FSnapshotHandle:=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0);
  FProcessEntry32.dwSize:=Sizeof(FProcessEntry32);
  Process32First(FSnapshotHandle,FProcessEntry32);
  repeat
    if pos(uppercase(ExeName), uppercase(ExtractFileName(FProcessEntry32.szExeFile))) = 1 then
    begin
      result := FProcessEntry32.th32ProcessID;
      exit;
    end;

    ContinueLoop:=Process32Next(FSnapshotHandle,FProcessEntry32);
  until not ContinueLoop;
  CloseHandle(FSnapshotHandle);
end;