Untyped Parameter var Buf

[C0pa]

Habe mir eine Funktion jetzt geschrieben:

Delphi-Quellcode:

function bufferToString(var Buf; Len: Integer): String;
var 
  a: array of Byte; 
  i: Integer; 
begin
  SetLength(a, Len);
  for i := 0 to Len do
    a[i] := PByte(Cardinal(@pchar(buf)) + i)^;
  Result := String(a); 
end;

Die Funktioniert wunderbar.