C dll Aufruf in Delphi

[MikeS]

Danke,

aktuell sieht mein Code so aus:

Delphi-Quellcode:

implementation

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

{$R *.dfm}

procedure TForm1.encrypt1Click(Sender: TObject);
var resultlength: integer;
    sresult: string;
begin
      setlength(sresult, 255);
      resultlength := encryptData(PChar(edit1.Text), PChar(edit2.Text), PChar(sresult));
end;

und es gibt leider immer noch eine Zugriffsverletzung. Hat noch jemand eine Idee??

Danke
Mike