Gestion d'exception non déclenchée

Il y a quelques temps, suite à un post que j'ai fait sur ce forum, Sub0 m'a suggéré d'insérer un Try/Exceptdans mon code afin de gérer d'éventuelles erreurs lors de l'affichage de mes images. J'ai effectué quelques test mais je dois faire une erreur quelque part car la procédure appelée, ne s'exécute pas. J'ai renommé un fichier .txt en .bmp pour faire le test pour voir si l'exception était provoqué et géré.

Code:

---

1 2 3 4 5 6 7 8 9

procedure TForm1.Button1Click(Sender: TObject); begin try if not OpenPictureDialog1.Execute then exit; Image1.Picture.LoadFromFile(OpenPictureDialog1.filename); except on EInvalidGraphic do VérifieErreur; end; end;

---

Je met un showmessage à l'entrée de VérifieErreur mais mon programme plante avant de le lire avec le message d'erreur suivant: ''Project1.exe'' a provoqué une classe d'exception EinvalidGraphic avec le message IMAGE BITMAP INCORRECT.....

Y a t'il quelqu'un qui peut m'aider à comprendre

Merci

Duan

Salut !

Si si, ça fonctionne très bien, mais pas dans l'IDE (testé) !

Autre chose : mon Delphi pas content du tout avec

Citation:

---

VérifieErreur

---

Avec VerifieErreur ça va beaucoup mieux.

Mes 2 cts,
--
jp

PS : ça sera plus joli comme ça :

Code:

---

1 2 3 4

begin if not OpenPictureDialog1.Execute then exit; try ...

---

si tu veux donner dans le joli...

Code:

---

1 2 3 4 5 6 7 8 9

procedure TForm1.Button1Click(Sender: TObject); begin if OpenPictureDialog1.Execute then try Image1.Picture.LoadFromFile(OpenPictureDialog1.filename); except on EInvalidGraphic do VerifieErreur; end; end;

---

Bonjour,

Effectivement, comme dit Jipété, dans l'IDE, Delphi affiche un message d'erreur sur les exceptions. Si tu testes ton prog hors de l'IDE, ça fonctionnera comme tu le veux.
Maintenant, il est possible de désactiver l'arrêt sur les exceptions dans l'IDE en décochant la case 'Arrêter sur exceptions Delphi' dans l'onglet 'Exceptions du langage' des options du débogueur (menu Outils/Options du débogueur).
Eb.

Merci beaucoup, simple mais fallait le savoir (je saurai). J'ai retourné ce code pendant 2 soirées en vain en retournant dans Aide,Faq, Recherche ect.

Pour Jipété, excuse moi, j'avais tout simplement recopié la partie principale du code dans un nouveau projet afin de faire un copier/coller plus net sans lignes inutiles et j'ai mis le é par inadverdance. Mon delphi n'aime pas non plus...

Par ici, on dirait que ce soir, je vais me coucher moins ''niaiseux''.



Merci à tous, vos suggestions sont grandement appréciées.

Duan