Discussion :

[lazaro]

Bonjour, j'ai un probleme avec delphi 2009
apres la reussite de la compilation il effectue
seulemnt la première partie de mon code et
affiche le message suivant
le projet projet1.exe a declenché la classe d'exception Econverterror avec le message '''''' n'est pas une valeur entière valide
j'ai vérifié toute mes variables et convertion tout est normal.
j'attend votre aide.
je vous envoi la fiche avec le code ( agent.pas)
et le message d'ereur (ereur.jpg)

[skywaukers]

bonjour,

tu utilises un ou des composants particuliers ? Montre peut-être un peu ton code, ça guidera un peu pour t'aider.

@++
Dany

[mick605]

Salut

Poste nous ton code stp, on ne peux pas deviner ton erreur
Ca vient du fais que tu essayes de convertir une chaine vide en entier ...

Edit : Ouah, trop rapide

[lazaro]

ok j'ai ajouté le code et le message d'erreur

[ero-sennin]

Salut et bienvenue sur Developpez.com,

Sans avoir regarder le code, je pencherai sur le fait que tu utilises un StrToInt sur un TEdit vide... d'où le message d'erreur ...

En espérant t'avoir mis sur la piste pour la résolution de ton souci.
A plus

[mick605]

+1 pour ero-sennin

Je pense que ca vient de cette ligne :

Code :

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

int_agent := strtoint(dbedit4.Text);

A mon avis, dbEdit4.Text vaut '' ...

PS : pas la peine de m'envoyer un message privé pour ca, si je passes sur la discussion, je réponds, (si j'ai envie)

[Jeankiki]

Salut,

Alors si ça vient de cette ligne

Code :

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

1
2
3
 
Code :
int_agent := strtoint(dbedit4.Text);

Tu peux faire ceci afin de ne plus avoir le problème

Code :

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

1
2
 
int_agent := StrToIntDef(dbedit4.Text, 0);

De cette façon, s'il n'y a pas de valeur, il mettra 0 par défaut

Jeankiki

[mick605]

Salut,

Alors si ça vient de cette ligne

Code :

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

1
2
3
 
Code :
int_agent := strtoint(dbedit4.Text);

Tu peux faire ceci afin de ne plus avoir le problème

Code :

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

1
2
 
int_agent := StrToIntDef(dbedit4.Text, 0);

De cette façon, s'il n'y a pas de valeur, il mettra 0 par défaut

Jeankiki

Bien vu, tu peux aussi te servir de TryStrToInt (F1)

[lazaro]

ok merci ca marche maintenant.