Bonjour et bon week-end !

Décidément, les accents me cherchent
J'ai codifié
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
var xMois : WideString;
.
.
xMois := FormatDateTime('mmmm yyyy', Date - 30);    // Date est aujourd'hui
ShowMessage(xMois);              //  ici je vois f?vrier 2013
showMessage(AnsitoUtf8(xMois));   //  ici je vois février 2013
xMois := AnsitoUtf8(xMois);
.
.
Label1.Caption := xMois;     // et là, je vois apparaître f?vrier 2013 !
Énervant non ?