DecimalSeparator/fr: what changed
Revision 1 to 2. Removed lines have a minus sign; added lines have a plus sign.
| Old | New | Line | |
|---|---|---|---|
| 1 | 1 | **DecimalSeparator** (séparateur décimal) est une [[Global variables|variable char globale]] dont le contenu est déterminé par la [[locale/fr|locale]] utilisée. Elle est utilisée pour la représentation des nombres flottants sous forme de chaîne de caractères dans les fonctions StrToFloat() et FloatToStr(). | |
| 2 | 2 | ||
| 3 | 3 | Aussi longtemps que toutes les instances d'un programme utilise le même séparateur décimal, tout se passera comme prévu. Toutefois, si l'une des instances du programme est basée sur la locale holllandaise (nl_NL) et écrit un fichier contenant des nombres flottants formatés et qu'une autre instance lit ces données avec une locale anglaise US (en_US), vous allez avoir un problème car un nombre formaté comme 123,456 va provoqué une exception de conversion... (la virgule n'est pas le séparateur décimal de cette locale.) | |
| 4 | 4 | ||
| 5 | 5 | Un palliatif pouvant être utilisé : | |
| 6 | 6 | ||
| 7 | 7 | ``` pascal | |
| 8 | 8 | function DecFloat2Str( const d: double ): string; | |
| 9 | 9 | var | |
| 10 | 10 | myseparator: char; | |
| 11 | 11 | begin | |
| 12 | 12 | myseparator := DecimalSeparator; | |
| 13 | 13 | DecimalSeparator := '.'; | |
| 14 | 14 | Result := FloatToStr( d ); | |
| 15 | 15 | DecimalSeparator := myseparator; | |
| 16 | 16 | end; | |
| 17 | 17 | ``` | |
| 18 | 18 | ||
| 19 | 19 | DecimalSeparator est défini dans sysinth.inc comme: | |
| 20 | 20 | ||
| 21 | - | ||
| 21 | + | ```text | |
| 22 | + | DecimalSeparator : Char absolute DefaultFormatSettings.DecimalSeparator deprecated; | |
| 23 | + | ``` | |
| 22 | 24 | ||
| 23 | 25 | NB : cette variable est marquée obsolète, il faut employer DefaultFormatSettings.DecimalSeparator à la place. | |
| 24 | 26 | ||
| 25 | 27 | ## Voir aussi | |
| 26 | 28 | ||
| 27 | 29 | - [[ThousandSeparator/fr]] | |
| 28 | 30 | - [[ListSeparator/fr]] | |
| 29 | 31 | - [Documentation sur DecimalSeparator](http://www.freepascal.org/docs-html/rtl/sysutils/decimalseparator.html) | |
| 30 | 32 | ||
| 31 | 33 | --- | |
| 32 | 34 | *From the Free Pascal wiki, page "DecimalSeparator/fr", as it stood on 2020-02-12 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).* |