in etwa so:
Delphi-Quellcode:
function copytoString(Adresse:pointer;laenge:integer):string;
begin
setlength(result,laenge);
move(Adresse^,result[1],laenge);
end;
Die Laenge ist entsprechend die Länges des Records+die Länge von Data (Es schadet aber i.A. nicht mehr zu nehmen)
Wahrscheinlich bekommst du die Länge von Data aus dem xyz.Data[0] heraus. Damit ist Länge bei dir =sizeof(Record)+ord(Record.Data[0])