Q
qdlover
Unregistered / Unconfirmed
GUEST, unregistred user!
implementation
function myadd(a:integer;b:integer):integer;stdcall; external 'staticadddll.dll' Name 'myadd';
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
t:integer;
begin
t:=myadd(1,2);
showmessage(inttostr(t));
end;
我同事给我的函数定义是 int myadd(int a,int b)
然后执行程序，按button1,显示3，然后报错
access violation at 0x00000000:read of address 0x00000000'.Process Stopped.Use step or Run to continue.
如果用
function myadd(a:integer;b:integer):integer;far; external 'staticadddll.dll' Name 'myadd';
调用，则计算结果都是错误的
用LoadLibrary,GetProcAddress方式调用，结果也是错误的
我在调用程序的工程文件（DPR）最开始引用 Sharemem 单元了，还是不行啊
请问，应该怎么解决啊？
function myadd(a:integer;b:integer):integer;stdcall; external 'staticadddll.dll' Name 'myadd';
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
t:integer;
begin
t:=myadd(1,2);
showmessage(inttostr(t));
end;
我同事给我的函数定义是 int myadd(int a,int b)
然后执行程序，按button1,显示3，然后报错
access violation at 0x00000000:read of address 0x00000000'.Process Stopped.Use step or Run to continue.
如果用
function myadd(a:integer;b:integer):integer;far; external 'staticadddll.dll' Name 'myadd';
调用，则计算结果都是错误的
用LoadLibrary,GetProcAddress方式调用，结果也是错误的
我在调用程序的工程文件（DPR）最开始引用 Sharemem 单元了，还是不行啊
请问，应该怎么解决啊？
;