Текущий архив: 2006.03.26;
Скачать: CL | DM;

Вниз

Проблема с Handle процесса   Найти похожие ветки 

← →
Новичоккк   (2006-03-07 14:19) [0]

Первый вариант:
var
 StartInfo: TStartupInfo;
 ProcInfo: TProcessInformation;
begin
 ZeroMemory(@StartInfo, SizeOf(TStartupInfo));
 StartInfo.cb := SizeOf(TStartupInfo);
 CreateProcess(nil, "notepad.exe", nil, nil, False, 0, nil, nil, StartInfo, ProcInfo);
end.
ProcInfo.hProcess

Второй вариант:
wnd:=FindWindow(nil,"Безымянный - Блокнот");
PID:=GetWindowThreadProcessID(wnd);
if PID=0 then
 begin
  ShowMessage("Wrong PID");
  exit;
 end;
ProcHandle:=OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ, false, PID);
Теоритически Handle один и тот же?

---

← →
Fay ©   (2006-03-07 14:26) [1]

> Теоритически Handle один и тот же?
С какого перепуга?

---

Страницы: 1 вся ветка

Текущий архив: 2006.03.26;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.041 c