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

Вниз

Как программно определить какие библиотеки использует приложение?   Найти похожие ветки 

← →
kanibal   (2009-12-01 18:24) [0]

Сабж.

---

← →
clickmaker ©   (2009-12-01 18:40) [1]

EnumProcessModules()

---

← →
S-C-L ©   (2009-12-01 19:36) [2]



var TModuleArray : array of TModuleEntry32;

function GetModulesListByProcessId(ProcessId: Cardinal): TModuleArray;
var
 hSnapshot: THandle;
 lpme: TModuleEntry32;

 procedure AddModuleToList;
 begin
   SetLength(Result, High(Result) + 2);
   Result[high(Result)] := lpme;
 end;

begin
 SetLength(Result, 0);
 hSnapshot := CreateToolhelp32Snapshot(TH32CS_SNAPMODULE, ProcessId);
 lpme.dwSize := SizeOf(lpme);
 if Module32First(hSnapshot, lpme) then
 begin
   AddModuleToList;
   while Module32Next(hSnapshot, lpme) do
     AddModuleToList;
 end;
end;


---

← →
S-C-L ©   (2009-12-01 19:37) [3]

uses TLHelp32; // не забудь

---

← →
Сергей М. ©   (2009-12-03 09:44) [4]

> какие библиотеки использует приложение


В данный момент времени или вообще ?

---

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

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

Наверх

Память: 0.47 MB
Время: 0.083 c