EnumModules, процедура

Синтаксис


procedure EnumModules(Func:  TEnumModuleFuncLW;  Data:  Pointer);

Описание

Процедура EnumModules вызывает пользовательскую функцию обратного вызова (callback function) для каждого исполняемого модуля приложения, т. е. для исполняемого модуля, для каждого пакета и DLL, которые загружаются приложением.

Пользовательская функция получает два параметра: дескриптор экземпляра каждого модуля и Data. Функция возвращает истину для продолжения перечисления модулей и ложь, чтобы остановить работу процедуры EnumModules и вызвать ее немедленное завершение.
EnumModules - настоящая процедура.

Ошибки

Советы и приемы

Для обратной совместимости EnumModules перегружена и может использовать функцию обратного вызова, которая объявлена с параметром HInstance типа Integer. Однако в новых программах следует предпочесть тип LongWord или, если речь идет о модуле Windows, THandle.

Пример


// Загружаем список модулей в строковый список. Data должна
// быть ссылкой на TStrings.
function GetModules(Instance: THandle; Data: Pointer): Boolean;
var
  FileName: array[0..Max_Path] of Char;
begin
  if GetModuleFileName(lnstance,  FileHame, SizeOf(FileName)) = 0 then
     TStrings(Data).Add(FileName)
  else
     RaiseLastWin32Error;
     Result  : = True;
end;
  ...
EnumModules(GetModules,   ListBoxl.Itesis);

Смотрите также

Процедуры EnumResourceModules, RegisterModule, UnregisterModule, функции FindCIassHInstance, FindHInstance.
    Учебник по языку Pascal          Лабораторные работы по программированию          Справочник



Нет комментариев.


Оставить комментарий:
Ваше Имя:
Email:
Антибот: *  
Ваш комментарий: