Arrondi non destructeur

Version imprimable

11/10/2011, 19h07
Gualino

Arrondi non destructeur

Bonsoir à tous,

Voilà en fait j'ai une boucle de calcul qui ne converge pas, je pense que cela vient du fait que certaine valeur entrant dans ce calcul sont arrondi.

L'arrondi est fait au niveau du getter de la propriété, elle même bindé à une textbox pour afficher le résultat avec un ou deux décimaux.
Or ma boucle de calcul qui comprend ces valeurs à une tolérance de l'ordre du millième.

Comment faire pour arrondir la valeur pour la textbox et la garder brut pour le calcul?

C'est manifestement impossible avec Round, je pensais que FomatNumber ferait l'affaire mais il semble que non.

Merci d'avance.
11/10/2011, 19h15
Pol63

salut

il aurait été judicieux tu nous donner le type de tes variables et éventuellement un bout de code (qui ressemble si tu ne veux pas donner le vrai)

les single et double sont connus pour causer des problèmes d’arrondis, le type décimal est plus approprié

Ce sont des doubles

Pour le code, entre autre:

Code:

1
2
3
4
5
   Public ReadOnly Property ProportionOfElasticWeightTransferInRoll_Rear As Double
        Get
            Return Round(CalculateProportionOfElasticWeightTransferInRoll(ElasticWeightTransferInRoll_Rear, GeometricWeightTransferInRoll_Rear), 1)
        End Get
    End Property

11/10/2011, 19h26
Pol63

utilise donc des decimal

l'explication est ici : http://www.developpez.net/forums/d81...-correctement/
11/10/2011, 19h40
Gualino

Désolé mais je ne vois pas en quoi cela change la donne sur le fait d'afficher la valeur dans la textbox avec deux décimaux et l'employer brut dans un autre calcul.
11/10/2011, 19h58
Pol63

le code que tu nous as mis n'est pas le code d'un calcul mais d'un round

ca ne coute rien de faire un replace de double en decimal et de voir si le problème persiste
11/10/2011, 20h42
sevyc64

Si je me trompe pas le Round que tu fais te donne un arrondi à 1 décimale après la virgule. Difficile après de vouloir continuer les calculs comme si tu avait conserver la précision à 4 décimales.

Quand on a besoin de faire des calculs on conserve les valeurs dans des variables du type adéquat. On ne les convertis (pour l’affichage par exemple) que le plus tard possible.
Un textbox, c'est fait pour saisir ou afficher, c'est pas fait pour mémoriser une valeur de calcul.

Ta valeur doit être conservée dans une variable. Tu peux afficher le contenu de cette variable dans une textbox si tu veux, mais tes calculs doivent se faire à partir de la variable, et non pas de ce que tu affiche, si la valeur affichée n'est pas la valeur réelle des calculs.
11/10/2011, 20h56
Nathanael Marchand

Faire des calculs avec des double produit des erreurs de calcul. C'est pour cela qu'il faut utiliser des decimal
13/10/2011, 10h02
Gualino

Sauf si je ne vous ai pas compris, vous ne m'avez pas compris.

J'ai un tas de premiers calculs qui ont besoins d'être visualisés dans un textbox avec un ou deux décimales. Mais comme ces résultats sont affichés dans la textbox par liaison binding, je ne peux pas arrondir :
textbox.text=round(objet.valeur)
donc je le fait au niveau de la propriété:
return round(function)

Ensuite j'ai besoin d'un max de précision sur ces valeurs pour faire un calcul plus complexe.

Donc finalement j'ai fait deux fois la même propriété avec 2 nom différents, l'une est arrondi et lié à la textbox, l'autre n'est pas arrondi et sert au calcul plus complexe.

:D
13/10/2011, 10h03
Gualino

Citation:

Envoyé par sevyc64

Si je me trompe pas le Round que tu fais te donne un arrondi à 1 décimale après la virgule. Difficile après de vouloir continuer les calculs comme si tu avait conserver la précision à 4 décimales.

Quand on a besoin de faire des calculs on conserve les valeurs dans des variables du type adéquat. On ne les convertis (pour l’affichage par exemple) que le plus tard possible.
Un textbox, c'est fait pour saisir ou afficher, c'est pas fait pour mémoriser une valeur de calcul.

Ta valeur doit être conservée dans une variable. Tu peux afficher le contenu de cette variable dans une textbox si tu veux, mais tes calculs doivent se faire à partir de la variable, et non pas de ce que tu affiche, si la valeur affichée n'est pas la valeur réelle des calculs.

Tout a fait d'accord :D
13/10/2011, 10h26
Nathanael Marchand

Je ne suis pas expert en binding Winform mais sur WPF et Silverlight il est possible de définir le formatage des chiffres pour le binding. Il existe peut etre quelque chose d'equivalent.
13/10/2011, 14h28
Gualino

Citation:

Envoyé par Nathanael Marchand

Je ne suis pas expert en binding Winform mais sur WPF et Silverlight il est possible de définir le formatage des chiffres pour le binding. Il existe peut etre quelque chose d'equivalent.

bien vu!

En allant voir les methods de la classe binding j'ai trouvé FormatString:

Citation:

Gets or sets the format specifier characters that indicate how a value is to be displayed.

çà doit être çà.
Il m'aura fallu ta remarque pour aller voir par là...:roll:

Bonjour,

voir ici

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Class MonObjet
    Private _LaValeurExacte As Decimal
    Public ReadOnly Property LaValeurExacte As Decimal
        Get
            Return _LaValeurExacte
        End Get
    End Property
End Class
 
Class Form1
    Sub New()
        InitializeComponent()
        monTextBox.DataBindings.Add("Text", instanceDeMonObjet, "LaValeurExacte", True, DataSourceUpdateMode.OnValidation, 0D, "N2")
    End Sub
End Class

Ou alors, avec un traitement personnalisé, voir exemple en fin de page : (pas sûr que cela convienne pour une non-perte de données :aie:)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
Class MonObjet
    Private _LaValeurExacte As Decimal
    Public ReadOnly Property LaValeurExacte As Decimal
        Get
            Return _LaValeurExacte
        End Get
    End Property
End Class
 
Class Form1
    Sub New()
        InitializeComponent()
        Dim b As New Binding("Text", instanceDeMonObjet, "LaValeurExacte")
        AddHandler b.Format, AddressOf ValeurExacteVersTexteAffichage
        AddHandler b.Parse, AddressOf TexteAffichageVersValeurExacte
    End Sub
 
    Private Sub ValeurExacteVersTexteAffichage
(sender As Object, e As ConvertEventArgs)
        '...
    End Sub
    Private Sub TexteAffichageVersValeurExacte
(sender As Object, e As ConvertEventArgs)
        '...
    End Sub
End Class

Cordialement !
N.B. : j'arrive encore après la guerre... :aie: (faut vraiment que j'arrête de pondre des pavés ; ou que j'utilise la technique à Pol63 :lol:)