Erreur : "" n'est pas une valeur entière valide

Résolu
JordanP31 Messages postés 26 Date d'inscription   Statut Membre Dernière intervention   -  
 Profil bloqué -
Bonjour,

J'ai fait un petit bout de code sous Delphi et j'ai une erreur qui s'affiche : Classe d'exception EConvertError avec un message "" n'est pas une valeur entière valide.

Une solution ?

Mon code : 
procedure TForm1.bnSP98Click(Sender: TObject);
var
  prixSP98: extended;
  quantite: extended;
  prixTotal: extended;

begin;
  prixSP98 := 1.25;
  quantite := StrToInt(edQuantite.Text);
  prixTotal := StrToInt(edPrix.Text);
  prixTotal := quantite * prixSP98;
  edPrix.Text := FloatToStr(prixTotal);
end;



1 réponse

Réponse 1 / 1
Profil bloqué
 
1- Evite le type Extended, contente toi du type Double

2- Si la variable Quantite reçois des objets indivisibles, mieux vaut la déclarer de type entier Integer d'où l'erreur dans cette ligne : quantite := StrToInt(edQuantite.Text); sinon, le pascal objet respecte le transtypage de type, la fonction prédéfinie StrToInt() renvoie un entier alors que Quantite est déclarée variable flottante.

Const prixSP98 := 1.25;
var Quantite : integer;
PrixTotal : Double;

Quantite : StrToInt();
PrixTotal := Quantite * prixSP98;
TextPrix := FloatToStr(PrixTotal);
0

Discussions similaires

Erreur 3005 sur France TV
Cambodgil -
PK -

5 réponses
Code erreur 3000
Laurent -
JM -

5 réponses
Panne T32 sur telecommande Orange
rayseg22G -
Fifi -

6 réponses
impossible lire vidéos france 2
pauline21 -
freezet -

5 réponses
Problème streaming France 2
95 indomptable -
robmat2005 -

1 réponse