[corps666]

Код:

HINSTANCE hdll = NULL;
hdll = LoadLibrary("DllMain.dll");
if (NULL == hdll) {
	// Не запущена
} else {
	// Запущена
}

lmikle: Пользуемся тегами!!!

Не работает выводит ошибку 22 и жалуется на hdll объявляю как переменную результат тот же.
Прошу помогите пожалуйста с данной проблемой.
Как сделать что бы данная функция работала? и какие библиотеки надо подключить если они нужны.

[NumLock]

Код:

var
  hDll: HMODULE;
begin
  hDll:=LoadLibrary('c:\Windows\System32\kernel32.dll');
  if hDll=0 then raise Exception.Create('!LoadLibrary');
  FreeLibrary(hDll);
end;

[corps666]

Код:

var
hDll: HMODULE;
begin

 hDll:=LoadLibrary('vorbisfile.dll');
 if hdll=0 then
 begin
 showmessage ('l1');
 end
 else
 begin
 showmessage ('12');
 end;
 end;

end.

К сожалению не совсем то что надо вышло.
Мне надо искать уже запущенные библиотеки в оп. и при наличии этой библиотеке писать следующее например сообщения.

[M.A.D.M.A.N.]

GetModuleHandle

Ты можешь изъясняться по человечески, ничерна не понатно что надо.

[corps666]

Надо не запустить библиотеку, а проверить имеется ли он в оперативной памяти.
типо дополнительного подключения библиотеки уже из оп если hDll изменяется (процесс в него вгружается из оп) то он выполняет следующее действие если нет то продолжает работу.

[M.A.D.M.A.N.]

Ну так GetModuleHandle, если библа не загружена - выведет INVALID_HANDLE_VALUE (DWORD(-1)), если есть, то вернет ее BaseAddress.