Aprés formatage d'un Edit, je peux pas faire de calcul, ni d'affectation

Version imprimable

24/11/2007, 17h05
Socrat

Aprés formatage d'un Edit, je peux pas faire de calcul, ni d'affectation
Bonjour tout le monde,

Aprés formatage d'un Edit, je peux pas faire de calcul, ni d'affectation
Code:

1 2 3 4 5 6 7 8 float xSum=1678.56; Edit1->Text=FormatFloat("##,###,##0.00",xSum); . . . Table1MONTANT->Value=StrToFloat(Edit1->Text);
message d'erreur :

'1 678.56' is not a valid floating point value

Remarequer l'espace de séparateur des milliers.

Comment peut on reformater le Edit1 ?

J'ai mets cette solution :

Aprés affichage, je formate mon Edit pour enlever l'espace de séparateur des milliers

Code:

Edit1->Text=FormatFloat("#######0.00",xSum);

mais ca ne marche pas :(

Bonjour,

le problème provient du séparateur de décimale.
Regardez dans l'aide à propos de StrToFloat:
Code:

1 2 3 4 5 La variable globale DecimalSeparator définit le caractère qui doit être utilisé comme séparateur décimal. Le séparateur des milliers et les symboles monétaires ne sont pas admis dans la chaîne. Si S ne contient pas une valeur valide, StrToFloat déclenche une exception EConvertError.
On rencontre le même genre de problème en VBA.
Il faut faire en sorte que lorsque l'utilisateur tape un '.' ou une ',', de remplacer ce caractère par le séparateur de décimale définit dans Windows.

En espérant que cela réponde à votre problème...

Salut !

Je ne sais pas s'il existe une fonction toute faite pour ce problème.

Par contre, en attendant une solution plus courte :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
double __fastcall TForm1::FormatToFloat(AnsiString N)
{
AnsiString R = "";
char c;
for(int j = 1; j <= N.Length(); j++)
    {
    c = N[j];
    if(((c >= '1') && (c <= '9')) || (c == DecimalSeparator))
        {
        R = R + N[j];
        }
    }
return R.ToDouble();
}

donc :

Code:

1
2
 
double rSum = FormatToFloat(Edit1->Text);

Sans doute à améliorer !

A plus !

27/11/2007, 11h10
Socrat

Bonjour,

J'ai bricolé une autre solution, pour éviter l4utilisation de Edit!, je déclare une variable accessible dans tout ma Form1, xVar1, et a chaque modification au affectation de Edit1 je met cette variable a la meme valeur>
Comme ca j'ai mon affichage formaté et le traitement se fait avec xVar1, aprés chaque traitement j'affecte xVar1 a Edit1.

Et sa marche.

Avant cette solution, j'ai pensser a la meme sol de henderson au je remercie mais j'aurai plus de code.

Je remercie aussi rtg57.;)