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

Вниз

Как определить путь к программе...   Найти похожие ветки 

 
rimd ©   (2004-04-05 17:21) [0]

зная дескриптор главного окна под 95/98/ME


 
VMcL ©   (2004-04-05 17:39) [1]

GetWindowThreadProcessId +
CreateToolhelp32Snapshot + Process32First + Process32Next


 
rimd ©   (2004-04-06 09:44) [2]

HProc:=GetWindowThreadProcessId(Form1.Handle,ProcID);

if HProc=0 then
ShowMessage("GetWindowThreadProcessId=0");

SnapH:=CreateToolhelp32Snapshot(TH32CS_SNAPTHREAD,ProcID);

if SnapH=0 then
ShowMessage("CreateToolhelp32Snapshot=0");

pe32.dwSize:=SizeOf(tagPROCESSENTRY32);

if not Process32First(SnapH,pe32) then
ShowMessage"Process32First=False");

ShowMessage(strPas(pe32.szExeFile)); // Здесь

if not Process32Next(SnapH,pe32) then
ShowMessage("Process32Next=False");

ShowMessage(strPas(pe32.szExeFile)); // и здесь

Здесь и здесь ничего не выводится!


 
BiN ©   (2004-04-06 09:50) [3]

Енто что такое ?!
CreateToolhelp32Snapshot(TH32CS_SNAPTHREAD,ProcID)



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

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

Наверх




Память: 0.47 MB
Время: 0.069 c
3-1082783494
hursand
2004-04-24 09:11
2004.05.23
TIBTransaction


6-1081246556
FireMan_Alexey
2004-04-06 14:15
2004.05.23
Асинхронные сообщения сокетов!


1-1084287680
Eugene30
2004-05-11 19:01
2004.05.23
Как программно (в run-time) получить список всех форм проекта?


3-1083253108
Mister
2004-04-29 19:38
2004.05.23
обработка False


4-1080913212
fatman@nm.ru
2004-04-02 17:40
2004.05.23
Как прибить процесс если окна не видно?