Discussion :

[kiminfor]

Salut,
J'ai un problème de calcul. Je prends les données de deux tables différentes et je fais le calcul comme suit:

Code :

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

1
2
 
DBEdit21.Text := inttostr(  (strtoint(Form1.Table3['INDDejeuner']) * StrToInt(Form1.Table1['NbrDejeuner']))+ (strtoint(Form1.Table3['INDDinner'])* strtoint(Form1.Table1['NbrDinner'])) + (strtoint(Form1.Table3['INDDecoucher']) * strtoint(Form1.Table1['NbrDecoucher']))  );

Table3['INDDejeuner'] de Type N (N: Numérique)
Table1['NbrDejeuner'] de Type N
Table3['INDDinner'] de Type N
Table1['NbrDinner'] de Type N
Table3['INDDecoucher'] de Type N
Table1['NbrDecoucher'] de Type N

Message d'erreur: Conversion de type variant incorrecte

J'ai revu plusieurs fois le code mais je ne vois pas ou est le probleme. Aidez moi à trouver l'erreur; peut être quelle est évidente pour vous!

[SergioMaster]

si tes valeurs sont bien numériques et non nulles je ne vois pas pourquoi tu utilises strtoint

Code :

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

strtoint(Form1.Table3['INDDejeuner'])

ceci serait déjà plus juste :

Code :

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

DBEdit21.Text := inttostr(  (Form1.Table3['INDDejeuner'] *Form1.Table1['NbrDejeuner'])+ (Form1.Table3['INDDinner']*Form1.Table1['NbrDinner']) + (Form1.Table3['INDDecoucher'] * Form1.Table1['NbrDecoucher'])  );

reste ensuite les problèmes des nulls au cas où , c'est pour cela que je préfère toujours indiquer le type de données

i.e. Form1.Table1['NbrDinner'].asInteger , Table['Prix'].asCurrency etc ..
en fait (je suis vieux jeu ) je préfére encore plus sous la forme Table.fieldByName('champ').as<Type>

[kiminfor]

Merci SergioMaster pour la solution

en fait (je suis vieux jeu ) je préfére encore plus sous la forme Table.fieldByName('champ').as<Type>

ça marche