testdll.dpr

delphi开发语言下的源代码分析

library TestDll;

uses
  ShareMemRep,
  FinalTest;

var
  Str : String = 'Written by Aimingoo!'#$0D#$0A;

function GetStringFromDLL(S : String) : String;
begin
  Result := Str + S;
end;

exports
   GetStringFromDLL;

end.