Code unicode dans le programme

Bonsoir,

Commençons par exposer le contexte :
Pièce jointe 646849

En haut une ligne avec le bloc-note de Linux et une fonte sérif (Balava, de SofterViews [ggl connait]), et dessous la même ligne où j'ai remplacé l'apostrophe rigide (bien nommée "chiure de mouche" dans le monde de la typographie) par une jolie courbe, telle qu'elle est dessinée dans la fonte, et récupérée par le code unicode u2019.

La question est : comment avoir cette chose dans le TEdit d'une fiche, depuis le code ? Parce qu'à la main, en cliquant dans le TEdit et en saisissant le code donné ci-dessus (Ctrl Shift U 2019 pour Linux), ça fonctionne.

Merci,

Bonjour,

On a abordé ce souci ici :
https://www.developpez.net/forums/d2...ctere-unicode/
En bref, il suffit d'utiliser UTF8Encode :

Code:

---

1 2 3 4 5 6

var S= UnicodeString; begin S= #$2019; Label1.Caption:= UTF8Encode(S) ; end;

---

bb

Salut bb,

Citation:

---

Envoyé par bb84000

On a abordé ce souci ici :
https://www.developpez.net/forums/d2...ctere-unicode/
En bref, il suffit d'utiliser UTF8Encode :

---

un énorme merci à vous tous, qui avez passé du temps là-dessus, et je me demande bien comment j'ai pu passer à côté de cette discussion :koi:

Bref, j'ai joué un peu avec tout ça, ai parcouru tous les posts et in fine, j'arrive à ça :
avant
Pièce jointe 646873
après
Pièce jointe 646874
avec ces trois lignes :

Code:

---

1 2 3 4 5 6 7 8

var s :UnicodeString; c :cardinal; begin c := $2019; // apostrophe s := 'J'+WideChar(c)+'ai l'+WideChar(c)+WideChar($0153)+'il'; Label2.Caption := UTF8Encode(s); end;

---

Et je garde dans un coin le code d'Andnotor pour les grands nombres, avec son smiley, que j'ai vu :

Code:

---

1 2 3 4 5 6 7 8 9

var s : UnicodeString; c : cardinal; begin c := $1F600; // Smiley s := WideChar((c -$10000) div $400 +$D800) // High surrogate +WideChar((c -$10000) mod $400 +$DC00); // Low surrogate Label1.Caption := UTF8Encode(s); end;

---

source : https://en.wikipedia.org/wiki/UTF-16#Examples

Encore merci, :resolu:, bonne journée, toussa toussa... ;)
:coucou: