probleme de type

Version imprimable

29/05/2009, 12h40
jojolastar27

probleme de type

bonjour,Et oui c'est encore moi :mouarf:

Je dialogue avec un automate et grace a builder C++ j'envoie les données (temperature) dans excel afin de les sauvegarder.
Ensuite j'ai realiser un ptit code afin d'afficher certaines temperatures dans un graphique en utlisant "Chart1".
Le problème est que des fois l'automate m'envoie des caractères et non des chiffre et comme le "Chart1" utilise des doubles ....ERREUR

Quel condition puis je faire afin de ne pas prendre cette cellule (de l'ignorer)??

merci

Hello,

Un truc de ce genre ?
Code:

1 2 3 4 5 6 7 8 AnsiString chaine; double valeur; if (TryStrToFloat(chaine, valeur)) { // Ajouter au graphe } else // ....
Les fonctions StrToXXXDef sont pratiques également:
Code:

1 2 AnsiString chaine; double valeur = StrToFloatDef(chaine, 0);

29/05/2009, 13h49
kineton

Sinon, une petite expression régulière peut également répondre à la question.;)
31/05/2009, 10h12
kmaniche
Si ton automate t'envoi que des nombres donc des réels et que tu veux transtypé :
Code:

1 2 val = StrToFloat(Lavaleurlue) ;
03/06/2009, 09h01
jojolastar27
j'ai essayer tout se que vous m'avez dit mais sa me met une erreur... comme quoi un double ne peut pas recevoir de caractère.
Le truc c'est que je vai chercher ma valeur dans excel elle revien en variant, ensuite je la converti en double afin de l'afficher dans le graphique.C'est entre les 2 que je dois verifier si il peut se convertir
j'ai essayer:
Code:

1 2 3 4 5 6 7 8 9 try { Y=vCell.OlePropertGet("value"); } catch(EConvertError*err) { return; }
Sa marche pas non plus...

Citation:
Envoyé par jojolastar27
j'ai essayer tout se que vous m'avez dit mais sa me met une erreur... comme quoi un double ne peut pas recevoir de caractère.
Le truc c'est que je vai chercher ma valeur dans excel elle revien en variant, ensuite je la converti en double afin de l'afficher dans le graphique.C'est entre les 2 que je dois verifier si il peut se convertir
j'ai essayer:
Code:

1 2 3 4 5 6 7 8 9 try { Y=vCell.OlePropertGet("value"); } catch(EConvertError*err) { return; }
Sa marche pas non plus...
Récupère plutot la propriété "Text" au lieu de value si tu n'est pas sur que ce soit un nombre et tu teste le format dans builder...quoique je sais plus si ça change grand chose, mais ça coute rien d'essayer.
Et c'est OlePropertyGet, pas OlePropertGet ;)
Et il ne faut pas faire de return à l'intérieur du catch
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 bool erreur=false; double nombre; String chaine; try { chaine=vCell.OlePropertyGet("Text"); nombre=chaine.ToDouble(); } catch(EConvertError* err) { erreur=true; } if (erreur) return; ...

avec se code sa ne plante plus,et sa met bien mon message d'erreur a moi:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
double Z,heure,Y;
 bool erreur=false;
 String chaine;
 
//Lecture des valeurs present dans excels
 for(int i=2;i<=aligne;i++)
 {
        //Transfert dans la variable aValue la Date
        vCell=vWorksheet.OlePropertyGet("Cells",i,2);
        aValue=vCell.OlePropertyGet("Value");
 
        //Transfert dans la variable climatiseur le numero de la clim
        vCell=vWorksheet.OlePropertyGet("Cells",i,1);
        climatiseur=vCell.OlePropertyGet("Value");
 
        //Heure
        vCell=vWorksheet.OlePropertyGet("Cells",i,3);
        heure=vCell.OlePropertyGet("Value");
 
        //Condition afin d'afficher sur le graphique que la date selectionné
        if(aValue==MonthCalendar1->Date && climatiseur==ComboBox1->Text)
        {
 
           //Valeur de Tambiant
           vCell=vWorksheet.OlePropertyGet("Cells",i,4);
           try
           {
           chaine=vCell.OlePropertyGet("Text");
           Y=chaine.ToDouble();
           }
           catch(EConvertError *err)
           {
           MessageBox(NULL,"Valeur de Tambiant incorrecte","Erreur graphique",MB_OK);
           erreur=true;
           }
           if(erreur)
           return;
           Z=i;
           Series1->AddXY(Z,Y,Z,clRed);
           }
        }
 }

Mais pourquoi mon application ne passe pas à ma valeur suivante.En gros si une erreur se trouve à la 3eme ligne et qu'il y en a 5, il n'affiche pas les valeur en ligne 4 et 5 meme si elle sont bonne ...

à cause de

Code:

1
2
3
 
if(erreur)
  return;

Ca te fait sortir de la fonction dès qu'il y a une erreur

ce qu'il faut, c'est simplement passer à la prochaine. donc faire

Code:

1
2
3
 
if(erreur)
  continue;

Là ou return sort de la fonction, continue lui va sauter au "for" et prendre la prochaine valeur sans terminer le bloc d'instruction

Pour le message d'erreur, tu peux utiliser les fonctions de la VCL comme

Code:

1
2
 
MessageDlg("Format du Variant incorrecte", mtError, TMsgDlgButtons() << mbOK, 0);

ou avec un titre

Code:

1
2
 
TaskMessageDlg("Erreur graphique", "Format du Variant incorrect", mtError, TMsgDlgButtons() << mbOK, 0);

Et si tu ne les utilise pas, au pire, donne un Handle à MessageBox, c'est plus rigoureux.

Code:

1
2
 
MessageBox(NULL,...

devient

Code:

1
2
 
MessageBox(Application->Handle,...

j'ai pris Application->Handle, mais si tu peux utiliser celui de la fenêtre qui est affichée à ce moment là.

- En faire le moins possible dans le catch, juste positionner l'erreur et éventuellement mémoriser si besoin le message d'erreur.

- Et au début de la boucle du for n'oublie pas de mettre "erreur" à false, sinon, il prendra les prochaines valeurs comme fausse après une erreur.

Donc, en résumé :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
 
double Z,heure,Y;
 bool erreur;
 String chaine;
 
//Lecture des valeurs present dans excels
 for(int i=2;i<=aligne;i++)
 {
        erreur=false;
        //Transfert dans la variable aValue la Date
        vCell=vWorksheet.OlePropertyGet("Cells",i,2);
        aValue=vCell.OlePropertyGet("Value");
 
        //Transfert dans la variable climatiseur le numero de la clim
        vCell=vWorksheet.OlePropertyGet("Cells",i,1);
        climatiseur=vCell.OlePropertyGet("Value");
 
        //Heure
        vCell=vWorksheet.OlePropertyGet("Cells",i,3);
        heure=vCell.OlePropertyGet("Value");
 
        //Condition afin d'afficher sur le graphique que la date selectionné
        if(aValue==MonthCalendar1->Date && climatiseur==ComboBox1->Text)
        {
 
           //Valeur de Tambiant
           vCell=vWorksheet.OlePropertyGet("Cells",i,4);
           try
           {
           chaine=vCell.OlePropertyGet("Text");
           Y=chaine.ToDouble();
           }
           catch(EConvertError *err)
           {
             erreur=true;
           }
 
           if(erreur)
           {
             TaskMessageDlg("Erreur graphique", "Format du Variant incorrect", mtError,  TMsgDlgButtons() << mbOK, 0);
             continue;
           }
 
           Z=i;
           Series1->AddXY(Z,Y,Z,clRed);
           }
        }
 }

04/06/2009, 09h43
jojolastar27

merci nirgal76,sa marche nickel .
Tu est un champion :ccool: