Dll динамическое подключение

[MAcK]

Задача вот какая, нужно подключить длл но динамически
if fileexist('mydll') then
connect
else
no connect
Подскажите как это сделать

[Minimus]

var DLLHandle:THandle;

procedure LoadDll;
begin
// - какие-то подпготовительные команды.
  DLLHandle:=LoadLibrary('mydll.dll');
  if DLLHandle=0 then    ???????????   //не удалось загрузить
end;
//////////////////////////////////////////////////////////////
procedure UnloadDll;
begin
//  - 
  FreeLibrary(DllHandle);
end;

Чтобы узнать адрес нужной процедуры используй что-то вроде
p:=GetProcAddress(DLLHandle,'Имя нужной функции');
где p - процедурный тип.