Delphi DLL String übergeben

[DelTurbo]

Ups

Das im Programm habe ich falsch dargestellt. Das sieht so aus...

Delphi-Quellcode:

var
  Antwort   :array of Char;

procedure TfMain.btnGetTxtClick(Sender: TObject);
var
  line    :WideString;
begin
    SetLength(Antwort,StrToInt(edtTextLen.Text));
    GetTxt(@Antwort,StrToInt(edtTextLen.Text));
    SetString(line,PWideChar(@Antwort[1]),StrToInt(edtTextLen.Text)); //Length(Antwort));