Discussion :

[Invité1]

Bonjour a tous

En essayant de rajouter un nouvel enregistrement avec une clef existante, j’ai ce message d’erreur : « Le projet a provoqué une classe d’exception EMysqlException avec le message #23000 duplicate entry ‘DT/0686’ for key1, processus stoppé. Utilisez Pas-à pas ou Exécuter pour continuer » et c'est normal.

J’ai essayé de traiter cette exception avec le code suivant

Code :

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

1
2
3
4
5
6
7
8
9
10
 
uses Mysqlerrors; 
 
try
table1.Post;
 
except on E :EMySQLException do
MessageDlg('Erreur: clef en double', mtError, [mbOk], 0);
 
end;

ça ne marche pas

Vous n’auriez pas une idée

Merci

[teach]

ça ne marche pas

Il faut être plus clair,que te renvoie la gestion de l'exception

[Invité1]

Il faut être plus clair,que te renvoie la gestion de l'exception

le meme message d'erreur

"Le projet a provoqué une classe d’exception EMysqlException avec le message #23000 duplicate entry ‘DT/0686’ for key1, processus stoppé. Utilisez Pas-à pas ou Exécuter pour continuer "

si je fais ça

Code :

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

1
2
3
4
5
6
 
try
table1.Post; 
except
MessageDlg('Erreur: clef en double', mtError, [mbOk], 0);
end;

ça marche
mais j'aurai un probleme dans le cas ou je veux modifier un champ existant
ça va declancher l'exception

[Montor]

Code :

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

1
2
3
4
5
6
7
try
table1.Post;
 
except
     table1.Cancel; 
     MessageDlg('Erreur: clef en double', mtError, [mbOk], 0);
 end;

[Invité1]

Code :

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

1
2
3
4
5
6
7
8
 
try
table1.Post;
 
except
     table1.Cancel; 
     MessageDlg('Erreur: clef en double', mtError, [mbOk], 0);
 end;

ça marche pour un nouvel enregistrement,

pour modifier un enregistrement existant ça pose probleme (enfin chez moi)

merci pour ton aide

[teach]

Pourrions nous avoir le traitement que tu fais avant le try ou plus encore le code utilisé.