Zitat von
C0pa:
Kann jemand sagen was ich ändern muss?
Nee.
Erstmal wäre es raktisch, wenn du verrätst, wie und mit welchen Werten diese Funktion aufgerufen wird,
eventuell eine Erwähnung der Delphiversionen und was du eigentlich als Ergebnis (in deinem String) erwartest.
eventuell mal so versuchen und das
Len mit auswerten
SetString(S, @Buf, Len div SizeOf(Char));
ab Delphi 2009
S als AnsiString oder TRawByteString deklarieren und dann so
SetString(S, Buf, Len);
aber dennoch wäre es nicht schlecht, wenn man die Eingangswerte kennt, damit man darauf die passenste Lösung auswählen kann.