Как определить путь к программе...

← →
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)); // и здесь

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

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

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