Главная страница
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.024 c
1-1083942354
неважно
2004-05-07 19:05
2004.05.23
Массив из объектов


6-1080730866
tRiNEX
2004-03-31 15:01
2004.05.23
Перехват данных.


3-1082730096
Хохол
2004-04-23 18:21
2004.05.23
Одновременная работа пользователей с БД Access.


6-1080606162
Керик
2004-03-30 04:22
2004.05.23
Фактическое число байт


6-1081331309
NorthMan
2004-04-07 13:48
2004.05.23
Народ, в сети гуляет пример реализации PING а в Delphi