Среда, 19.09.2018, 13:33
Приветствую Вас Гость | RSS

DELPHI Report

Каталог статей Delphi Report

Главная » Статьи » - Delphi DLL

Как выгрузить Dll из памяти?

Code:

function KillDll(aDllName: string): Boolean;

var

hDLL: THandle;

aName: array[0..10] of char;

FoundDLL: Boolean;

begin

StrPCopy(aName, aDllName);

FoundDLL := False;

repeat

   hDLL := GetModuleHandle(aName);

   if hDLL = 0 then

     Break;

   FoundDLL := True;

   FreeLibrary(hDLL);

until False;

if FoundDLL then

   MessageDlg('Success!', mtInformation, [mbOK], 0)

else

   MessageDlg('DLL not found!', mtInformation, [mbOK], 0);

end;

Категория: - Delphi DLL | Добавил: delphi (31.01.2009)
Просмотров: 2105 | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Меню сайта
Google
Форма входа
Категории раздела
Общие вопросы [3]Среда Delphi [1]
Создание отчетов. Rave Reports [6]- Delphi DLL [9]
- Работа с реестром [5]Внешний вид программы [9]
Прикладные программы [1]
Здесь будут размещаться программы, файлы и по возможности описание программ прикладного характера
MS Office (MS Word, MS Excel ) [40]
Aвтоматизация отчетов с помощью средств MS Office (Word, Excel)
Построение графиков TChart, TDBChar [10]Matlab [3]
Здесь будут представлены примеры и статьи решения математических задач в среде матричных вычислений Matlab
Поиск
Друзья сайта
Статистика
Copyright MyCorp © 2018