AccessViolation dans TControl.Notification()

Bonjour,

Voilà depuis qq temps, quand je quitte mon programme en debug, j'ai un AccessViolation dans la méthode TControl.Notification(). J'ai d'abord pensé que c'était lors de la destruction de certaines fenêtres et j'ai donc fais un peu de ménage dans les OnDestroy (j'ai tjs tendance à vouloir tout détruire et nettoyer manuellement et parfois c'est un peu trop :D). Bref comme le problème ne se reproduisait plus j'ai pensé que c'était bon. Pas de bol qq jours plus tard ca a recommencé. J'ai donc pensé à mettre des points d'arrêt pour retracer le problème. Mais dès que je fais ca je n'ai plus aucune erreur, tout fonctionne correctement :/.
J'ai refais du ménage hier mais là aujourd'hui ca recommence. Est ce que quelq'un aurait une idée ou une suggestion ? Parce que je commence à péter un câble. Surtout que cette *ù$^= de :!$*$° d'erreur se produit aléatoirement :evilred:
Merci d'avance !

Frank.

Utilises-tu des threads ? Des DLL ou packages d'exécution ? S'agit-il d'un composant de tierce-partie qui provoque l'erreur ? De toi-même ? Quel est ce composant ?

Bref donne un peu plus de détail ;) Parce que là je ne vois pas comment t'aider ;)

Citation:

---

Envoyé par sjrd

Utilises-tu des threads ? Des DLL ou packages d'exécution ? S'agit-il d'un composant de tierce-partie qui provoque l'erreur ? De toi-même ? Quel est ce composant ?

Bref donne un peu plus de détail ;) Parce que là je ne vois pas comment t'aider ;)

---

threads : non
DLL : oui pour l'accès à une BDD mais ca m'étonnerait beaucoup que ca ait un quelconque rapport
packages d'exécution : ?

L'erreur se situe dans la procédure TControl.Notification() de l'unité Controls :

Code:

---

1 2 3 4 5 6 7 8 9

procedure TControl.Notification(AComponent: TComponent; Operation: TOperation); begin inherited Notification(AComponent, Operation); if Operation = opRemove then if AComponent = PopupMenu then PopupMenu := nil else if AComponent = Action then Action := nil; end;

---

et le debuggeur s'arrête sur la ligne

Code:

---

1 2	f Operation = opRemove then

---

Ce n'est pas moi qui provoque l'erreur, et je ne sais pas quel composant héritant de TControl pose problème (sinon je ne poserai pas la question ;)).
D'après ce que je lis dans l'aide cette méthode permet de mettre à jour la propriété PopupMenu, propriété que je n'utilise à aucun endroit.

Désolé de pas être plus précis, je ne sais pas comment expliquer plus le problème. Ce qui m'énerve c'est que c'est complètement aléatoire (depuis mon 1er message je n'arrive plus à le reproduire) et que c'est apparut soudainement.