关于DLL中函数的问题

[slmax1]

这是DLL工程中PAS里的代码

unit add1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;


procedure add(x:Integer;y:Integer);stdcall;


implementation

procedure add(x:Integer;y:Integer);stdcall;
begin
  ShowMessage(IntToStr(x+y));
end;

end.

这是DLL入口的代码

library add;


uses
  SysUtils,
  Classes,
  add1 in 'add1.pas';


exports
   add;问就出在这里，卡黄条

begin
end.

不知是哪个语法出了问题，望达人指教

[wintergoes]

library add;


uses
  SysUtils,
  Classes,
  add1 in 'add1.pas';

// add函数必须在这吧
procedure add(x:Integer;y:Integer);stdcall;
begin
  ShowMessage(IntToStr(x+y));
end;



exports
   add;问就出在这里，卡黄条

begin
end.

[bdmh]

exports
add;
你都没有写add代码，输出当然要出错了

[Seamour]

贴出错信息，代码本身没问题

[iamduo]

[Quote=引用 4 楼 seamour 的回复:]
贴出错信息，代码本身没问题

[/Quote]

我的写法基本也是这样。
除了
implementation
下面的那个stdcall，我不会写，uses里加Dialogs 以外。基本一致。

[iamduo]

看错了。Dialogs，有。
错误信息拿来。

[gyk120]

stdcall只是一种调用方式，不会出现这种错误，你的library里面没有add函数自然要报错了

[npkaida]

错误在于库和函数同名：
library add; --库名 add


uses
SysUtils,
Classes,
add1 in 'add1.pas';


exports
add; --函数名与库名同

begin
end.

制药修改其中一个名字就可以了。

[npkaida]

sorry 笔误。

只要修改其中一个名字就可以了。

[Seamour]

还真是重名了……

[shijian252651749]

粗心不得啊。。

[slmax1]

感谢各位的指点。