DLL und übergabe von PChar

[ATS3788]

Delphi-Quellcode:

function StrTest(const S1, S2 : PAnsiChar)  : PAnsiChar;    cdecl;

implementation

function StrTest(const S1, S2 : PAnsiChar)  : PAnsiChar;
var
S3 : PAnsiChar;
begin
try
GetMem(S3, StrLen(S1) + StrLen(S2) + 1 );
  StrCopy(S3 , '');
   StrCat(S3 , S1);
    StrCat(S3 , S2);
      Result := S3;

finally
FreeMem(S3);
end;
 end;

Hallo Delphianer
Ich bin mir nicht sicher ob das so richtig ist,
deshalb meine Frage.

Kann ich Strings so C Konform übergeben und abrufen ?