IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Delphi Discussion :

[Message d'erreur] gérer les message d'erreurs


Sujet :

Langage Delphi

  1. #1
    Membre confirmé Avatar de heid
    Profil pro
    Inscrit en
    mai 2002
    Messages
    388
    Détails du profil
    Informations personnelles :
    Localisation : France, Indre et Loire (Centre)

    Informations forums :
    Inscription : mai 2002
    Messages : 388
    Points : 587
    Points
    587
    Par défaut [Message d'erreur] gérer les message d'erreurs
    Bonjour ,
    situation
    je crée un service qui doit être assez bavard au niveau des logs.
    Aussi, je voudrais pouvoir écrire dans les logs le message d'erreur renvoyé par le système en cas de levée d'exeption.
    J'ai donc utilisé ce code et, pour tester, demandé l'édition d'une requête non ouverte (j'ai aussi testé avec un strtoint('jojo') ).

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
     
    try
    // ouverture table pile pour voir si travail a faire
       ado1.SQL.Text:='select * from pile where Tache=''QwickMatch''';  
       ado1.edit; // erreur évidente
       ado1.close;
     
    except
      EcrireLogBase('Erreur dans le traitement : '+ SysErrorMessage(getlasterror));
    end;
    Problème
    Le résultat dans les log est ironico-paradoxal :
    Erreur dans le traitement : Opération réussie
    Question
    Comment faire pour que le message d'erreur soit en rapport avec mon erreur et non a chaque fois : opération réussie.
    Merci d'avance.



    Delphi7 pro
    win 2000 Serveur

  2. #2
    Membre expert

    Homme Profil pro
    Responsable de service informatique
    Inscrit en
    janvier 2004
    Messages
    2 123
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Charente Maritime (Poitou Charente)

    Informations professionnelles :
    Activité : Responsable de service informatique

    Informations forums :
    Inscription : janvier 2004
    Messages : 2 123
    Points : 3 256
    Points
    3 256
    Par défaut
    Salut,

    Pour que le message d'erreur soit en rapport avec l'erreur, tu peux faire comme cela :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
     
    try 
    // ouverture table pile pour voir si travail a faire 
       ado1.SQL.Text:='select * from pile where Tache=''QwickMatch''';  
       ado1.edit; // erreur évidente 
       ado1.close; 
     
    except 
      on E:Exception do begin
        EcrireLogBase('Erreur dans le traitement : '+ E.ClassName +'->'+E.message);
      end;
    end;
    Voila,
    A+

    [Edit] Si tu utilise le moteur JET, tu peux récupérer les code d'erreur avec :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    for Index := 0 to Connection1.Errors.Count-1 do begin
      Err := IntToStr(Connection1.Errors[Index].SQLState);
    ....
    end;
    CV :
    - LinkedIn
    - Viadeo

  3. #3
    Membre confirmé Avatar de heid
    Profil pro
    Inscrit en
    mai 2002
    Messages
    388
    Détails du profil
    Informations personnelles :
    Localisation : France, Indre et Loire (Centre)

    Informations forums :
    Inscription : mai 2002
    Messages : 388
    Points : 587
    Points
    587
    Par défaut
    Merci de ton, aide.

    an exception handler can specify an identifier before the name of the exception class. This declares the identifier to represent the exception object during execution of the statement that follows on...do. The scope of the identifier is limited to that statement. For example,

    try
    ...
    except
    on E: Exception do ErrorDialog(E.Message, E.HelpContext);
    end;

    C'étati dans l'aide delphi, honte sur moi

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. forum : gérer les messages lus et non lus avec un cookie
    Par elcoyotos dans le forum Langage
    Réponses: 2
    Dernier message: 18/08/2014, 15h30
  2. Réponses: 0
    Dernier message: 21/12/2011, 13h02
  3. Gérer les messages d'erreurs dans delphi
    Par nakry dans le forum Débuter
    Réponses: 2
    Dernier message: 11/05/2010, 15h32
  4. Où remonter les omissions et erreurs sur les cartes?
    Par Max_B dans le forum IGN API Géoportail
    Réponses: 1
    Dernier message: 18/04/2010, 22h08
  5. Gérer les numéros d'erreur
    Par charles.bourasseau dans le forum Langage
    Réponses: 5
    Dernier message: 01/12/2008, 11h41

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo