dll nur laden wenn vorhanden

[ebber]

Danke
das ganze ist mir nur etwas zu kompiziert.

Kann ich jetzt so die dll laden ?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);

var
    Handle: THandle;

begin

  try

    Handle := LoadLibrary(PChar((ExtractFilePath(Application.ExeName)+'xyz.dll')));

  except

end;

Und wie greife ich dann daruf zu ?
vorher hatte ich das so


function HNP(pid:DWORD):BOOL; stdcall;external 'xyz.dll'; ???

MfG