Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.26;
Скачать: CL | DM;

Вниз

Получение PID   Найти похожие ветки 

 
g-l-u-k ©   (2006-01-07 00:28) [0]

Доброго времени суток.
Мой вопрос заключается в следующем, есть некий *.exe файл, мне нужно запустить и затем получить Process ID запущенного процесса. Как это можно сделать? Чтобы получить PID, я делал так:
Var
Wh,pid,ph:integer;
……
Begin
wh:=findwindowex(0,0,0,pchar(edit1.text));
pid:=getwindowthreadprocessid(wh,@pid);
ph:=OpenProcess(PROCESS_VM_READ,false,pid);
closehandle(wh);  


Пытался сделать так, но ничего не вышло:

Var
Wh,pid,ph:integer;
H:Thandle;
……
Begin
H:=createfile(pchar(editFileName.text),GENERIC_READ,0,nil,OPEN_EXISTING,0,0);
wh:=findwindowex(0,0,0,pchar(h));
pid:=getwindowthreadprocessid(wh,@pid);
ph:=OpenProcess(PROCESS_VM_READ,false,pid);
closehandle(wh);


Помогите пожалуйста.


 
Delphi_is_cool ©   (2006-01-07 00:58) [1]

Используй ф-цию createprocess.



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

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

Наверх




Память: 0.46 MB
Время: 0.035 c
2-1141644031
Farpik
2006-03-06 14:20
2006.03.26
Как отследить подключение к Интернету?


2-1142294469
Wood
2006-03-14 03:01
2006.03.26
Файл или каталог.


2-1141725866
Zloy
2006-03-07 13:04
2006.03.26
Компилируемая программа запускается только на Windows XP


2-1141894640
nap<>
2006-03-09 11:57
2006.03.26
Про формы :)


2-1142245192
dabreezy
2006-03-13 13:19
2006.03.26
TstringList - глюк на глюке.