genau, bei einem ShortString ist die Länge ausnahmslos durch das Längenbyte festgelegt
und eine abschließende #0 ist laut Definition nicht vorgesehn.
bleib einfach bei (P)ShortString:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var P: PChar;
st: TAKClass;
// st.FStrings: TStringlist;
begin
// ...
P := @
GUI.Langs[j];
for i := x
to y
do //x,y sind nicht so wichtig
begin
st.FStrings[i] := StringReplace(PShortString(P)^,
'
\n', #13#10, [rfReplaceAll,rfIgnoreCase]);
inc(P, SizeOf(ShortString));
end;