Funkcja w dll

BU
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 297
0

Witam.
Może mój problem jest banalny, ale w jaki sposób umieścić w dll funkcję, a potem wywołać ją w głównym programie. Mam np. coś takiego:

Kopiuj
function nazwa(parametr: string) : string;
begin
różne instrukcje;
Result:=Wynik;
end;

Kiedy robię jak z procedurami, to nie działa. Podpowie ktoś?

zajcev
  • Rejestracja: dni
  • Ostatnio: dni
0

Szukaj.. było.. a poza tym google..

Azarien
  • Rejestracja: dni
  • Ostatnio: dni
1

będę dobry.

Kopiuj
library test;

uses sharemem;

function nazwa(parametr: string) : string;
begin
  Result:=parametr+' rulez!';
end;

exports
  nazwa;

END.
Kopiuj
{$apptype console}

program testuj;
uses sharemem;

function nazwa(parametr: string) : string; external 'test.dll';

BEGIN
  writeln(nazwa('Ahmed'));
END.

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.