Discussion :

[Coussati]

salut

j'ai une application qui a parfois des bug : message d'erreur, surtout indice -1 pour les listbox et parfois plantage carrément de l'exe qui se kille ...

j'aimerais avoir une version provisoire sans ce genre de prob vu que je n'ai pas encore le temps de chercher les anomalies

j'ai connu : try ... finaly ... end;

mais vu que je ne sais pas d'ou viennent les exeptions, j'aimerais savoir s'il y avait un moyen de protéger tout le prog ?

ou alors qu'est ce que vous me conseillez ?

car à par le kill et les msgbox, ça va, on peut tjrs utiliser le programme ...

[neilbgr]

Il y a surtout le Try.. Except..
Pour savoir comment l'utiliser comme il faut, cf http://delphi.developpez.com/cours/l...n-des-erreurs/
Ensuite, le tout est une affaire de développement "propre"...

[Coussati]

je suis d'accord pour le développement propre c'est pkoi c'est provisoire ... c'est une appli web qui tourne 24h/24, donc je ne veux pas fermer le site le temps de trouver les différentes erreurs

et t'images le nombre de procédure que je dois avoir ... mettre des "try" partout est un peu relou, c'est pourquoi je demandais s'il y avait mieu ...

[Kaféine]

Salut,

Généralement on colle un bloc try finally dans un try except et vice versa
pour libérer les objets et intercepter les exceptions.

L'idée est d'implémenter un gestionnaire pour l'évènement OnException de l'objet TApplication.

pour aller au plus simple, tu colle un TApplicationEvent et tu met rien dans le OnException ou alors tu loggue les exceptions dans un fichier.

Code :

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

1
2
3
4
5
 
procedure TForm1.ApplicationEvents1Exception(Sender: TObject; E: Exception);
begin
  //rien ou loggue dans un fichier
end;

en espérant que le provisoire ne dure pas .....

[Laurent Dardenne]

Ensuite, le tout est une affaire de développement "propre"...

Pas mieux.
Dans ton cas utilise MadExcept(cf. google), gratuit pour un usage non-commercial, qui te permettra de trouver plus facilement l'origine des bugs restant dans ton appli.

[Coussati]

Salut,

Généralement on colle un bloc try finally dans un try except et vice versa
pour libérer les objets et intercepter les exceptions.

L'idée est d'implémenter un gestionnaire pour l'évènement OnException de l'objet TApplication.

pour aller au plus simple, tu colle un TApplicationEvent et tu met rien dans le OnException ou alors tu loggue les exceptions dans un fichier.

Code :

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

1
2
3
4
5
 
procedure TForm1.ApplicationEvents1Exception(Sender: TObject; E: Exception);
begin
  //rien ou loggue dans un fichier
end;

en espérant que le provisoire ne dure pas .....

ça m'a l'air dune bonne idée, mais je n'ai pas compris, peux tu me donner plus de précision stp ?

[djeckelle]

Bonjour à tous,

Pour la gestion des exceptions, le bloc :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Try
  // Morceau de code à protéger
Except
  on E : Exception do
    begin
      // Action à réaliser sur error du type précédent (Exception, EStringListError,EAccessViolation,EConvertError ...)
     
     // Pour afficher un message clair de ton erreur
     Showmessage(E.Message);
    end;
End;

Tu peux utiliser Abort; pour une erreur dite "silencieuse" mais ce ne sera pas très propre

Ensuite dans la FAQ de developpez.com tu trouveras de bon conseils et de bonne méthodes

Bon courage