String zu PAnsiChar

[daywalker9]

So funktioniert es:

x[i]:=StrNew(pAnsiChar(AnsiString(s[i])));