Discussion :

[manubrard]

Bonjour tout le monde,

voila, j'aimerais savoir comment remplacer les points par des virgules dans des chaines de caractères. J'ai essayer la fonction StringReplace mais il me dit que les points et les virgules sont de types incompatibles.

Code :

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

TEdit(Unit3.Form_Menu_Modif_Tarif_Exapaq.FindComponent(NomChamps)).Text:=StringReplace(TEdit(Unit3.Form_Menu_Modif_Tarif_Exapaq.FindComponent(NomChamps)).Text,'.',',',rfReplaceAll);

Merci d'avance a ceux qui m'aideront.

a++

[Frank]

C'est étonnant car cela devrait marcher.

Es tu sur que la valeur dans laquelle tu veux faire le remplacement est bien une chaine de carctères?

[Rayek]

Code :

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

1
2
3
 
With Unit3.Form_Menu_Modif_Tarif_Exapaq do
TEdit(FindComponent(NomChamps)).Text:=StringReplace(TEdit(FindComponent(NomChamps)).Text,'.',',',[rfReplaceAll]);

Pfffioouuu, la c'est un peu plus lisible.
Il manquait les [] pour le rfReplaceAll

[manubrard]

Merci Malatar, ça marche nickel maintenant.

A plus et encore merci.