FreePascal.ru

Вот код DLL:


Library Compleks;

procedure summaTWO(var sum: integer; a,b: integer); Export;
begin
sum:=a+b;
end;

Exports
summaTWO index 1 name 'ADD' resident;

begin
end.

Это так сказать тест. Вот программа использующая DLL:


program procedure_;
uses crt,Complex;
Var a,b,c ...