wenn z.b.
length(astring)
genutzt wird, dann muß man größere Umbauten vornehmen.
Ansonsten
Delphi-Quellcode:
tshortstring=packed record
Long:byte;
text:array of {Byte oder 8Bit-Char}
end;
Aber beachten, das ist nur ein Datencontainer!
Die meisten Funktionen werden wahrscheinlich mit einem Fehler aussteigen.
Gruß
K-H
ShortString ist ein statisches Array!
Bei dir ist "text" ein Pointer und da muß man eventuell so Einiges beachten. (leider kann man mit den Generics nicht de größe dieses Arrays definieren, womit sich damit nichts dynamisches für Length 1..255 erzeugen lässt)