Discussion :

[portu]

Bonjour,
Depuis le temps que j'y pense, je me décide enfin à poser la question :
Comment ne pas déclencher certaines exceptions lorsque le débogueur intégré est activé?
Directives de compilation ?
Exemple :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
 Var
 I : String;
 P : Integer;
 Begin
 i := 'voiture';
    Try
    P := Strtoint(I);
    Except
    P := 0;
    end;
 
  {Ne pas s'arreter ici si exception générée}
   Try
    P := P - Strtoint(I);
    Except
    P := 0;
    end; 
  {\Ne pas s'arreter ici si exception générée}
 End;

Un paramètre à régler dans les option du débogueur ?

Merci d'avance.

[Rayek]

Le seul moyen que je connaisse, c'est quand le message d'exception apparait, il y a une case à cocher qui permet d'ignorer l'exception à l'avenir.
Le seul problème c'est que cette exception sera ignorer à chaque fois et pas qu'a l'endroit que tu veux.
Pour la gestion des exceptions, il faut aller dans les options du débogueur ,puis dans les exception du langage, si tu veux en rajouter d'autres ou en retirer de la liste des ignorées

[portu]

Ca m'ennuie tout ca....
Pcq quand on débogue et qu'il faut ce farcir un série de try...except --> c'est lourd !

Enfin, si quelqu'un à une idée.

Ps : Je suis sous D7

[MFDev]

Salut,
Peut-être en évitant d'avoir l'exception par un traitement plus approprié, genre un test avant, par exemple en utilisant Val() au lieu de StrToInt().

Code :

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

1
2
3
4
5
6
7
  i := 'voiture';
  Val(i, P, Code);
  // Erreur pendant la conversion en entier?
  if Code = 0 then
    // conversion réussie, P = integer
  else
    // ce n'est pas un entier

Il vaut mieux réserver le TRY..EXCEPT pour des cas difficilement gérable, plutôt que d'utiliser cela comme mode de traitement...
@+
Fabrice

[neilbgr]

Effectivement, il vaut mieux prévenir que guérir...
Par exemple, pour le code suivant :

Code :

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

1
2
3
4
5
Try
  P := Strtoint(I);
Except
  P := 0;
end;

J'utiliserai plutot ceci :

Code :

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

P := StrToIntDef(I, 0);

Et pour le 2eme cas,

Code :

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

1
2
3
4
5
6
 
Try
  P := P - Strtoint(I);
Except
  P := 0;
end;

J'hasarderai celà :

Code :

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

P := P - StrTointDef(I, P);

[portu]

Bien entendu . C'était juste pour donner un exemple flagrant.
C'est clair qu'avec quelques conditions, il y aurait moyen de se passer du Try...Except. Mais des fois, c'est tellement tordu qu'on a pas envie de se prendre la tête.

Enfin bon, je sais ce qu'il me reste à faire....

Merci à vous tous.

[MFDev]

Mais des fois, c'est tellement tordu qu'on a pas envie de se prendre la tête.

C'est aussi un des plaisirs de la programmation... si tout était facile, cela deviendrait vite ch... à la longue ;o)
Aller, bon courage !
Fabrice