现有一个dll在程序根目录\mydll\in目录下，请问如何静态调用?

Question

现有一个dll在程序根目录\mydll\in目录下，请问如何静态调用?

Answer 1

sPath := ExtractFilePath(Application.ExeName) + '\mydll\in' + '\' + DllName
xx := LoadLibrary (sPath)
GetProcAddress    
FreeLibrary

Answer 2

静态调用：function testfunc;far;external 'c:\run\dll\testdll.dll';
    动态调用：temphd:=loadlibrary('c:\run\dll\testdll.dll');

Answer 3

楼上的是动态调用，静态很简单
如dll叫my.dll，有函数fun
procedure fun();stdcall;external "\mydll\in\my.dll"

Answer 4

>>请问如何静态调用?
没有什么区别啊, 只不过你声明时, 加上绝对dll的路径而已!!

Answer 5

静态调用是这样的：
function 函数名(参数列表):返回值类型;external'\mydll\in\my.dll'//不能用双引号;
以后你就可以调用函数了

Answer 6

静态
  function testfunc;far;external 'c:\run\dll\testdll.dll';动态
  temphd:=loadlibrary('c:\run\dll\testdll.dll');