Problème de conversion Minuscule/Majuscule en Delphi 7

Bonjour à tous,
J'ai un problème avec longmonthnames[]. Il me sort par exemple longmonthnames[2] février au lieu de Février.
Donc si quelqu'un sait résoudre ce problème, merci par avance.
Donc pour contourner le problème je fais :

Code:

---

1 2 3 4

var periode : string; periode := longmonthnames[2];   periode[1] := uppercase(periode[1]); //Ici c'est la ligne 90 du Programme

---

Je compile et exécute le programme, j'ai la même erreur (février au lieu de Février).
Si je lance en mode debug j'ai :

Citation:

---

[Warning] Essai.pas(90): Unsafe code 'String index to var param'
[Error] Essai.pas(90): Incompatible types: 'Char' and 'String'

---

et impossible d'aller plus loin.
J'ai cherché sur les forums et normalement cela devrait marcher.
Quelqu'un a t-il pu résoudre ce problème.

uppercase agit sur une string

il faut utiliser

Code:

---

periode[1] := UpCase(periode[1]);

---

Bonjour ! Je pense qu'il faut remplacer UpperCase(), qui renvoie un résultat de type string, par UpCase(), qui renvoie un résultat de type char.

Merci beaucoup cela fonctionne avec UpCase