Delphi-Quellcode:
type
LStr = packed record
cnt: Integer;
str: array[0..MaxInt] of Char;
end;
LStrPtr = ^LStr;
LStrHandle = ^^LStr;
Das wäre eine mögliche Übersetzung, die andere wäre array[0..0] und deaktiviertes Range-Checking.. In beiden Fällen muss beachtet werden, dass die wahre Länge von str niemals über cnt hinausgeht und alle Zugriffe, die jenseits von cnt-1 liegen, nicht gesichert sind.. Eine 100%ige Entsprechung des Codes gibt es, soweit ich weiß, nicht.