Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

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

01.01.2007
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;

Взято с сайта https://www.swissdelphicenter.ch/en/tipsindex.php