18 lines
260 B
ObjectPascal
18 lines
260 B
ObjectPascal
unit ATBUtils;
|
|
|
|
{$mode ObjFPC}{$H+}
|
|
|
|
interface
|
|
|
|
uses Classes, SysUtils;
|
|
|
|
procedure DeleteMem(P: PChar); stdcall;
|
|
|
|
implementation
|
|
const DLLName = 'CalculatorCInterface.dll';
|
|
|
|
procedure DeleteMem(P: PChar); stdcall; external DLLName;
|
|
|
|
end.
|
|
|