Bonjour,
Je commence la semaine avec un problème très pénible qui a tendance à me mettre de mauvaise humeur (déjà que le lundi...). En fait, mon programme ne veut pas gérer les exceptions et je ne sais pas pourquoi... J'en suis arrivé à faire un programme test :
Code :
- function test_exception():word ;
- begin
- try
- raise EVariantTypeCastError.Create('Test...');
- except
- on EVariantError do messagedlg('Yahoo ! Exception détectée...',mtInformation,[mbOK],0);
- end;
- end;
|
Et même ça ça veut pas aller dans mon bloc except, c quand même dingue !... (fonction appelée par une autre fonction déclenchée par l'appui d'un bouton). Je pense donc que c soit un problème de compilation, soit d'include, soit que j'ai pas le droit de foutre ma gestion là, soit que je suis vraiment trop con, soit... !
Autre petite question, y'a t-il moyen de connaitre le nombre de paramètres d'une fonction et d'accéder à leur valeur sans utiliser directement leur nom (pour automatiser un programme avec une boucle 'for' pour passer tous les paramètres un par un). Ca se fait en C mais en Delphi j'ai pas trouvé ?...
Merci bien pour vos réponses et bon courage pour le début de semaine (et la fin d'ailleurs !)