Violation d'acces en delphi [Résolu]
anyaa
Membre Dernière intervention
21 septembre 2009
- - Dernière réponse :
Bacterius
Membre Dernière intervention
3 juin 2016
- 22 sept. 2009 à 06:41
- Messages postés
- 10
- Date d'inscription
- lundi 25 mai 2009
- Statut
- Messages postés
- 3869
- Date d'inscription
- samedi 22 décembre 2007
- Statut
A voir également:
- Violation d'accès à l'adresse
- Acces d aff - Meilleures réponses
- Delphi access violation - Meilleures réponses
- Violation d'accès à l'adresse... ✓ - Forum - Delphi / Pascal
- Delphi 5 - Option du projet - Violation d'accès 0018F9CF / 0018FB1F ✓ - Forum - Delphi / Pascal
- Violation d'accès lors du parcours de l'arborescence d'un fichier XML ✓ - Forum - Delphi / Pascal
- Violation d'accès lors de la lecture de l'emplacement 0x00000000. ✓ - Forum - C++ & C++ .NET
- Violation d'acces c++ ✓ - Forum - C++ & C++ .NET
16 réponses
Meilleure réponse
- Messages postés
- 3982
- Date d'inscription
- mardi 8 mars 2005
- Statut
Salut,
L'instruction processeur située à l'adresse 00403F16 essaie de lire l'adresse 00071AC6. Cependant 0071AC6 n'est pas une adresse valide pour le processus. Cela peut se produire si tu dé-référence un pointeur qui pointait sur n'importe quoi, si tu vas trop loin dans un tableau...
Il faut que tu commences par localiser la ligne de code source posant problème.
Exécute ton programme dans l'IDE pour trouver la ligne de code correspondante.
Tu peux aussi utiliser "Chercher"->"Erreur à l'exécution..." (Utilisable quand ton programme tourne) et mettre l'adresse 00403F16. Cela te mène directement à la ligne de source correspondant à l'instruction.
Une fois que tu as la ligne tu peux essayer de comprendre quel morceau de ligne pose problème.
L'instruction processeur située à l'adresse 00403F16 essaie de lire l'adresse 00071AC6. Cependant 0071AC6 n'est pas une adresse valide pour le processus. Cela peut se produire si tu dé-référence un pointeur qui pointait sur n'importe quoi, si tu vas trop loin dans un tableau...
Il faut que tu commences par localiser la ligne de code source posant problème.
Exécute ton programme dans l'IDE pour trouver la ligne de code correspondante.
Tu peux aussi utiliser "Chercher"->"Erreur à l'exécution..." (Utilisable quand ton programme tourne) et mettre l'adresse 00403F16. Cela te mène directement à la ligne de source correspondant à l'instruction.
Une fois que tu as la ligne tu peux essayer de comprendre quel morceau de ligne pose problème.
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
140 internautes nous ont dit merci ce mois-ci
- Messages postés
- 10
- Date d'inscription
- lundi 25 mai 2009
- Statut
Bonjour r15,
effectivement,quand je cherche l'erreur une fenetre grise s'affiche et non pas l'editeur de code.
j'ai essayer cette methode sur un autre programme et dans ce cas, une ligne sur l'editeur de code etait en bleu et j'ai trouve mon erreur.
pour ce qui est de de mon programme principal, sur la fenetre grise en montant quelques lignes il y a inscrit en gras:"mov exc, [edx_$08]".
saurais tu ce que ca signifie?
merci encore.
effectivement,quand je cherche l'erreur une fenetre grise s'affiche et non pas l'editeur de code.
j'ai essayer cette methode sur un autre programme et dans ce cas, une ligne sur l'editeur de code etait en bleu et j'ai trouve mon erreur.
pour ce qui est de de mon programme principal, sur la fenetre grise en montant quelques lignes il y a inscrit en gras:"mov exc, [edx_$08]".
saurais tu ce que ca signifie?
merci encore.
- Messages postés
- 3982
- Date d'inscription
- mardi 8 mars 2005
- Statut
mov exc, [edx_$08]
Tel quel ça ne veut strictement rien dire car le "_" est très probablement un "-".
Mais bon quoiqu'il arrive, c'est très insuffisant pour comprendre. C'est une bête instruction processeur comme il y en a des kilomètres dans ton programme...
Non, ce qui pourrait éventuellement aider, c'est un symbole. Comme tu es en 00403F16, tu es très certainement dans du code compilé par Borland ou CodeGear, donc tu devrais en avoir un peu. Il faudrait que tu utilises l'ascenseur pour monter et trouver le premier symbole. Souvent, il s'agit du nom de la fonction dans laquelle le programme a planté.
- Messages postés
- 3982
- Date d'inscription
- mardi 8 mars 2005
- Statut
Gné ?
Par où commencer ?
C'est vrai que trouver le nom de la fonction peut ne pas l'aider. Mais si c'est par exemple Move ou autre (C'est un programme de manipulation de matrices...), ça peut être intéressant.
Mais s'il y a une chose au monde qui ne peut pas l'aider, c'est GetLastError, et ce pour différentes raisons.
1) GetLastError est une fonction de windows, alors que l'erreur à lieu dans les bibliothèques fournies avec Delphi. En effet, l'adresse de base de l'image par défaut sous Delphi est 00400000 (Visible dans les options du lieur). C'est l'adresse à laquelle est chargée le .exe. Les dlls de l'API Win32 sont quand à elle souvent chargées en 7XXXXXXX. L'erreur de anyaa a lieu à l'adresse 00403F16, donc dans le .exe (Qui plus est c'est confirmé par le "dans le module 'aff.exe'"). Et il y a peu de chance qu'une erreur de l'OS provoque une erreur dans les libs Borland, qui doit tester les codes retour et déclencher une exception explicite en cas de problème.
2) Une violation d'accès déclenche une interruption non maskable. C'est une erreur très grave (C'est souvent à elle qu'on doit les écrans bleus, quand elle à lieu dans du code en ring 0). Le code de l'interruption ne s'amuse pas à analyser le problème en détail. Il donne l'adresse de l'instruction fautive, si c'est pour de l'écriture ou de la lecture, et l'adresse invalide. Il ne va pas commencer à faire des SetLastError. Par contre il va déclencher une exception "access violation".
3) Ce point découle du 2). Que ce passe t'il quand une violation d'accès à lieu dans une API Win32 ? L'API Win32 n'est pas du tout blindé par rapport au violation d'accès, car il est tout simplement impossible d'y être blindé (Il y avait bien IsBadReadPtr/IsBadWritePtr mais elles n'ont pas été utilisées et sont obsolètes). Et donc si on lui passe des arguments avec des adresses incorrectes, l'API Win32 fait comme la lib Borland, elle fait un beau plantage, et ne va surtout pas chercher à comprendre pourquoi ou essayer de traiter l'exception.
Par où commencer ?
C'est vrai que trouver le nom de la fonction peut ne pas l'aider. Mais si c'est par exemple Move ou autre (C'est un programme de manipulation de matrices...), ça peut être intéressant.
Mais s'il y a une chose au monde qui ne peut pas l'aider, c'est GetLastError, et ce pour différentes raisons.
1) GetLastError est une fonction de windows, alors que l'erreur à lieu dans les bibliothèques fournies avec Delphi. En effet, l'adresse de base de l'image par défaut sous Delphi est 00400000 (Visible dans les options du lieur). C'est l'adresse à laquelle est chargée le .exe. Les dlls de l'API Win32 sont quand à elle souvent chargées en 7XXXXXXX. L'erreur de anyaa a lieu à l'adresse 00403F16, donc dans le .exe (Qui plus est c'est confirmé par le "dans le module 'aff.exe'"). Et il y a peu de chance qu'une erreur de l'OS provoque une erreur dans les libs Borland, qui doit tester les codes retour et déclencher une exception explicite en cas de problème.
2) Une violation d'accès déclenche une interruption non maskable. C'est une erreur très grave (C'est souvent à elle qu'on doit les écrans bleus, quand elle à lieu dans du code en ring 0). Le code de l'interruption ne s'amuse pas à analyser le problème en détail. Il donne l'adresse de l'instruction fautive, si c'est pour de l'écriture ou de la lecture, et l'adresse invalide. Il ne va pas commencer à faire des SetLastError. Par contre il va déclencher une exception "access violation".
3) Ce point découle du 2). Que ce passe t'il quand une violation d'accès à lieu dans une API Win32 ? L'API Win32 n'est pas du tout blindé par rapport au violation d'accès, car il est tout simplement impossible d'y être blindé (Il y avait bien IsBadReadPtr/IsBadWritePtr mais elles n'ont pas été utilisées et sont obsolètes). Et donc si on lui passe des arguments avec des adresses incorrectes, l'API Win32 fait comme la lib Borland, elle fait un beau plantage, et ne va surtout pas chercher à comprendre pourquoi ou essayer de traiter l'exception.
- Messages postés
- 3982
- Date d'inscription
- mardi 8 mars 2005
- Statut
Voilà une petite démo :
On fait un SetLastError avant l'appel à la fonction Win32, indiquant que la dernière erreur est disque plein. Puis on passe l'adresse 1 comme adresse du message à mettre dans la MessageBox, adresse invalide et différente de nil.
RaiseLastOSError génère une exception avec un message d'erreur basé sur GetLastError.
Quand on exécute ce code dans le débogueur, on voit deux exception :
On retrouve bien user32 qui contient MessageBoxA, l'adresse en 7XXXXXXX, la lecture, et l'adresse posant problème : 1.
Puis l'exception est traitée et RaiseLastOSError fait son boulot. Il fait un GetLastError et génère une exception correspondante :
Mais quand il fait son GetLastError, il récupère la valeur que l'on a settée avant l'appel à MessageBox. MessageBox n'a pas mis à jour la dernière erreur avec un nouveau code.
De même, ce code ne sert à rien, du moins en ce qui concerne les violation d'accès :
Les arguments passés doivent être correctes d'un point de vue mémoire, un point c'est tout.
procedure TForm1.Button1Click(Sender: TObject);
begin
SetLastError(39); // 39 = disque plein
try
MessageBox(0, PChar(1), 'Hello world !', MB_OK);
except
RaiseLastOSError;
end;
end;
On fait un SetLastError avant l'appel à la fonction Win32, indiquant que la dernière erreur est disque plein. Puis on passe l'adresse 1 comme adresse du message à mettre dans la MessageBox, adresse invalide et différente de nil.
RaiseLastOSError génère une exception avec un message d'erreur basé sur GetLastError.
Quand on exécute ce code dans le débogueur, on voit deux exception :
Le projet Project1.exe a provoqué une classe d'exception EAccessViolation avec le message 'Violation d'accès à l'adresse 7E3A15F7 dans le module 'user32.dll'. Lecture de l'adresse 00000001'. Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour continuer.
On retrouve bien user32 qui contient MessageBoxA, l'adresse en 7XXXXXXX, la lecture, et l'adresse posant problème : 1.
Puis l'exception est traitée et RaiseLastOSError fait son boulot. Il fait un GetLastError et génère une exception correspondante :
Le projet Project1.exe a provoqué une classe d'exception EOSError avec le message 'Erreur système. Code : 39.
Le disque est plein'. Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour continuer.
Mais quand il fait son GetLastError, il récupère la valeur que l'on a settée avant l'appel à MessageBox. MessageBox n'a pas mis à jour la dernière erreur avec un nouveau code.
De même, ce code ne sert à rien, du moins en ce qui concerne les violation d'accès :
nResult:= MessageBox(0, PChar(1), 'Hello world !', MB_OK);
if nResult = 0 then
begin
// Il y a eu une erreur dans MessageBox
end;
Les arguments passés doivent être correctes d'un point de vue mémoire, un point c'est tout.
- Messages postés
- 3982
- Date d'inscription
- mardi 8 mars 2005
- Statut
Hé bin voilà.
LStrAsg recopie une chaîne dans une variable globale.
Donc on peut reproduire ton problème "facilement" comme ça :
Et on tombe là dessus :
Ca te rappelle rien ?
C'est b qui est passé dans edx, une chaîne étant un pointeur. Il y a une vérification edx différent de nil, puis on va taper en adresse pointée par edx - 8. Qu'est ce qu'il y a en -8 ? Le compteur de référence de la chaîne.
Vu que j'ai mis b à 1, l'adresse posant problème est 1 - 8 = FFFFFFF9.
Donc dans ton cas, la chaîne fautive pointe sur 00071AC6 + 8 = 00071ACE.
Maintenant tu as une idée beaucoup plus précise de ce que tu recherches, non ?
Comment ça non ?
Ton problème est vraisemblablement l'affectation d'une chaîne invalide à une variable globale. En ce qui concerne la variable globale, il peut s'agir aussi d'un tableau de string, d'un membre d'une instance de classe ou de structure globale... Il se peut aussi que cette affectation de chaîne ne se fasse pas explicitement dans ton code (Appel d'une méthode Delphi qui fasse l'affectation).
Tu dois afficher les résultats de tes calculs, non ? Tu dois y convertir des nombres en chaînes, non ? Le problème peut être par là.
Après faut aussi se demander pourquoi la chaîne à affecter est invalide. Il peut s'agir d'un écrasement mémoire dût au calcul, d'une non initialisation...
Bonne recherche !
LStrAsg recopie une chaîne dans une variable globale.
Donc on peut reproduire ton problème "facilement" comme ça :
unit Unit1;
...
var
a: String;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
b: String;
begin
asm
mov b, 1
end;
a:= b;
end;
end.
Et on tombe là dessus :
mov ecx, [edx-$08]
Ca te rappelle rien ?
C'est b qui est passé dans edx, une chaîne étant un pointeur. Il y a une vérification edx différent de nil, puis on va taper en adresse pointée par edx - 8. Qu'est ce qu'il y a en -8 ? Le compteur de référence de la chaîne.
Vu que j'ai mis b à 1, l'adresse posant problème est 1 - 8 = FFFFFFF9.
Donc dans ton cas, la chaîne fautive pointe sur 00071AC6 + 8 = 00071ACE.
Maintenant tu as une idée beaucoup plus précise de ce que tu recherches, non ?
Comment ça non ?
Ton problème est vraisemblablement l'affectation d'une chaîne invalide à une variable globale. En ce qui concerne la variable globale, il peut s'agir aussi d'un tableau de string, d'un membre d'une instance de classe ou de structure globale... Il se peut aussi que cette affectation de chaîne ne se fasse pas explicitement dans ton code (Appel d'une méthode Delphi qui fasse l'affectation).
Tu dois afficher les résultats de tes calculs, non ? Tu dois y convertir des nombres en chaînes, non ? Le problème peut être par là.
Après faut aussi se demander pourquoi la chaîne à affecter est invalide. Il peut s'agir d'un écrasement mémoire dût au calcul, d'une non initialisation...
Bonne recherche !
- Messages postés
- 3982
- Date d'inscription
- mardi 8 mars 2005
- Statut
Houps, pardon, pas la bonne impression écran.
Voilà la bonne :
Pour LStrAsg, je l'ai simplement googelisé pour tomber sur ça et et la page suivante.
Voilà la bonne :
Pour LStrAsg, je l'ai simplement googelisé pour tomber sur ça et et la page suivante.