Discussion :

[ovni76]

Bonjour,
Un petit problème avec la conversion.
J'utilise dans des tables sqlite 3 que des champs caractères même pour des valeurs numériques avec décimales, donc quand j'ai besoin d faire un calcul avec les données numériques j'utilise, par exemple la conversion suivante :

Code :

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

1
2
MCREDIT:=data.bank.FieldByName('CREDIT').AsString;
  XCREDIT:=StrToFloat(MCREDIT);

mais voila pour une raison que je ne connais pas la valeur XCREDIT déclarée comme variable de type Double ce retrouve avec un nombre important de chiffre après la virgule.
Pour essayer de contrer ce problème j'ai essayé une solution qui a fonctionnée par le passé en multipliant le nombre par 100, l'utilisation de la fonction round puis la division par 100 pour retrouver ma valeur
exemple ci-dessous d'une autre application

Code :

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

MMOYENNE_P:=FloatToStr(round(100*XMOYENNE_P)/100); ;

donc je supprime la conversion pour ne garder que le calcul, ma première application deviententmon application devient

Code :

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

XCREDIT:=round(100*XCREDIT)/100

Mais je n'obtiens pas le résultat voulu, j'ai toujours de nombreuses décimales.
Erreur de fonction ou erreur d'écriture ?
Merci d'avance pour votre aide.

[M.Dlb]

Beaucoup plus simple :

http://pascal.developpez.com/faq/?pa...un-nombre-reel.

[microb]

Bonjour,
Moi j'utilise floattostrf ; solde est un real, exemple :

Code :

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

Solde_Cb.Text:= floattostrf(solde,fffixed,9,2)  ;

[ovni76]

Bonsoir microb,
Je ne connaissais pas cette forme de conversion, elle correspond exactement à mon besoin. Merci bien

Bonsoir M. le Modérateur au nom compliqué,
Sauf erreur ou incompréhension de ma part le lien ne permet pas d'arriver au résultat désiré, la solution de microb oui.
Merci A+