xtool/contrib/FastMM4-AVX/Demos/Dynamically Loaded DLL/TestDLL.dpr

27 lines
282 B
ObjectPascal

library TestDLL;
uses
FastMM4,
SysUtils,
Classes,
DLLForm in 'DLLForm.pas' {fDLLMain};
{$R *.res}
procedure ShowDLLForm;
begin
with TfDLLMain.Create(nil) do
begin
try
ShowModal;
finally
Free;
end;
end;
end;
exports ShowDllForm;
begin
end.