我将 delphi XE2 与 FastMM4 一起使用。当我想使用关键字“延迟”创建 DLL 时,我在离开应用程序时违反了规定。如果我在没有“延迟”的情况下进行测试,则可以在没有违规的情况下离开应用程序
主要代码:
type
function Add(X, Y : Integer) : Integer; overload; stdcall external 'MaDll.dll' delayed;
var
Form3 : TForm3;
implementation
{$R *.dfm}
procedure TForm3.Button1Click(Sender : TObject);
begin
try
showmessage(IntToStr(Add(10, 5)));
except
on e : Exception do
showmessage(e.Message);
end;
end;
end.
DLL代码:
library MaDll;
uses
FastMM4,
System.SysUtils,
System.Classes;
{$R *.res}
function Add(X, Y : Integer) : Integer; stdcall;
begin
Result := X + Y
end;
exports
Add;
begin
end.
FastMM 中是否存在参数?