Funktion für leftstr / rightstr etc mit WideStrings

[Redeemer]

Noch eine generelle Warnung: Es gibt in Delphi (wie auch den meisten anderen Sprachen) ohnehin keine Methode, mit der man eine bestimmte Anzahl an Zeichen kopieren kann. Copy, LeftStr, RightStr etc. kopieren eine bestimmte Anzahl an Codeeinheiten, im Falle von Wide- bzw. UnicodeString UTF-16(LE)-Codeeinheiten. Auch die Angabe der Startposition bei Copy (und dessen langsameren Äquivalent MidStr) sind Codeeinheiten. Bei bestimmten Ideogrammen, Emojis usw. ist das unintuitiv. Das von dir gepostete Beispiel enthält aber keine Zeichen, die aus mehrere Codeeinheiten bestehen.

[himitsu]

Joar, da gibt es zwei Dinge

Einmal die Surrogates im UTF-16, das ist leicht zuerkennen,
also wenn #$D800..#$DBFF, dann gehört das nächste Char dazu.

Und dann die beliebten Combining-Chars, also mehrere Zeichen werden als ein Zeichen angezeigt.
z.B. kann man auch A¨ schreiben und sieht dann ein Ä.

Für diese Beiden gibt es im Windows Funktionen, die ich oben bereits genannt hatte.
Bei uns sieht man es fast nie, aber Richtung Asien und Co. ...

Noch mehr Spaß hat man bei den Smilieys, denn eigentlich bestehen bestanden die nur aus einem Char, aber jemand kam auf die Idee, dass Gendern saugeil wäre,
also kann man nun durch Zusatzzeichen noch Geschlecht und Hautfarbe von vielen Smilieys ändern. (ich glaub war 2018/2019)
(das Chinesengelb Simpsonsgelb gefiel einem nördlichen Ami wohl nicht )