C dll Aufruf in Delphi

[MikeS]

Hallo mkinzler,
vielen Dank für die schnelle Antwort. Das mit dem PChar dachte ich mir auch. Habe bisher folgenden Code:

Delphi-Quellcode:

implementation

function encryptData(KeyStr, DecryptedStr, EncryptedStr: PChar) : Integer; external 'EncDec.dll';

und diesen in einer Prozedur:

Delphi-Quellcode:

var resultlength: integer;
    keyStr, decryptedStr, encryptedStr: PChar;//string;//char(25);
begin
      GetMem(keyStr, length(edit1.Text) + 1);
      StrCopy(keyStr, PChar(edit1.Text));
      GetMem(decryptedStr, length(edit2.Text) + 1);
      StrCopy(decryptedStr, PChar(edit2.Text));
      GetMem(encryptedStr, 256);

      resultlength := encryptData(keyStr, decryptedStr, encryptedStr);

      FreeMem(keyStr);
      FreeMem(decryptedStr);
      FreeMem(encryptedStr);

Ich bekomme damit jedoch immer eine Speicherveltzung.

Danke
Mike