您所在位置：主题：请问如何在delphi中调用VC的DLL（动态链接库）
Dicon
[专家分：0] 发布于 2006-09-14 09:08:00
我有一个项目，目前使用DELPHI开发数据库界面，但是使用VC写的底层算法，
请问各位大侠，如何使用DELPHI调用VC的DLL。
代码如下：
procedure TForm1.Button1Click(Sender: TObject);
var
Number1,Number2:integer;
Sum:integer;
OneHandle:THandle; //定义一个句柄变量
PFunc: TFarProc;
begin
OneHandle := LoadLibrary('test.dll'); //动态载入DLL，并返回其句柄
Pfunc := GetProcAddress(Moudle,'Instr');
end;
调试时OneHandle有值，但是Pfunc始终=nil，请问怎样才能解决？？？？
请问各位大侠，如何使用DELPHI调用VC的DLL。
代码如下：
procedure TForm1.Button1Click(Sender: TObject);
var
Number1,Number2:integer;
Sum:integer;
OneHandle:THandle; //定义一个句柄变量
PFunc: TFarProc;
begin
OneHandle := LoadLibrary('test.dll'); //动态载入DLL，并返回其句柄
Pfunc := GetProcAddress(Moudle,'Instr');
end;
调试时OneHandle有值，但是Pfunc始终=nil，请问怎样才能解决？？？？
