uses
SysUtils,Classes,
TestUnit1 in 'TestUnit1.pas'{Form1},
DMUnit in '..\..\..\..\..\Work\Delphi\Syssen32\DMUnit'
function IntSum (x,y :Integer):Integer;stdcall;
begin
IntSum := x -y;
end;
大神们,速度现身阿
uses
SysUtils,Classes,
TestUnit1 in 'TestUnit1.pas'{Form1},
DMUnit in '..\..\..\..\..\Work\Delphi\Syssen32\DMUnit'
function IntSum (x,y :Integer):Integer;stdcall;
begin
IntSum := x -y;
end;