动态链接库的一个小问题(50分)

我在调用project1.dll 的时候，为什么系统提示说我的minusnum无法定位到'dll1/project1.dll
var
Form1: TForm1;

implementation
function plusnum(x, y: integer): integer; stdcall; external 'dll1/project1.dll';
function minusnum(x, y: integer): integer; stdcall; external 'dll1/project1.dll';
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
if combobox1.Text = '相加' then
edit3.Text := inttostr(plusnum(strtoint(edit1.text), strtoint(edit2.text)))
else if combobox1.text = '相减' then
edit3.Text := inttostr(minusnum(strtoint(edit1.text), strtoint(edit2.text)))
else
messagebox(form1.Handle, '请指定一个计算方法。', '警告', MB_OK + MB_ICONWARNING);
end;

你可以用绝对路径试一下

function plusnum(x, y: integer): integer; stdcall; external './dll1/project1.dll';
function minusnum(x, y: integer): integer; stdcall; external './dll1/project1.dll';
试试!

你的应用程序如果与ＤＬＬ不在同一个路径下，
你需要用绝对路径。否则用eric.youbin的方法试试。

重装了DELPHI一下，好了