Discussion :

[Fred 57220]

Bonjour

je souhaiterai mettre un caractère spéciale dans une chaine d'avertissement

Avertissement("Attention il n'y a pas assez de φj " à la place de
Avertissement("Attention il n'y a pas assez de wj "

je suis en mode compatible Ansi et je ne peux pas passer en mode Unicode.

y a t'il une astuce.

Merci

Fred

[DelphiManiac]

Faire une image qui contient le message et afficher cette image dans une fenêtre. C'est pas le plus propre mais c'est la première idée qui m'a traversée l'esprit.

[Hibernatus34]

Bonjour,

Comme vous ne pouvez pas avoir dans la même page de code les caractères français et grecs, il faut de toute façon passer par de l'unicode.

Mais le code suivant devrait fonctionner sans problème dans un projet "ANSI" :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
sToto est chaîne UNICODE = [
Attention il n'y a pas assez de %1j
]
 
sToto = ChaîneConstruit(sToto, CaractUnicode(966))
Avertissement(sToto)

Suggestion : définissez des "tags" pour vos caractères grecs et faites une fonction de remplacement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
PROCEDURE Greekomatic(LOCAL sChaîne est chaîne UNICODE)
sChaîne = Remplace(sChaîne, "<phi>", CaractUnicode(966))
// TODO: Remplacer les autres tags également
RENVOYER sChaîne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Avertissement(Greekomatic("Attention il n'y a pas assez de <phi>j"))

[Fred 57220]

Merci