violation d'accés à l'adresse 0083C2C5 dans le module '.bin' lecture de l'adresse 0000004A

Version imprimable

03/06/2015, 15h15
pimouche

violation d'accés à l'adresse 0083C2C5 dans le module '.bin' lecture de l'adresse 0000004A

Bonjour tout le monde,
J'ai un petit problème sur mon code,:(:(:( je développe une interface sur delphi XE2 et quand j’exécute j'ai ce message d'erreur:
"violation d'accés à l'adresse 0083C2C5 dans le module '...bin' lecture de l'adresse 0000004A"
Je ne vois pas ou est le problème.
Merci pour votre aide..........
03/06/2015, 16h27
free07

Bonjour,

Il faudrait que tu nous fasses voir les quelques lignes de code ou cela plante car une violation d'accès peut provenir de pas mal d'erreurs ou d'oublis ( par ex : accès à un objet non créé ? ...)
04/06/2015, 10h16
ShaiLeTroll

Comme l'adresse en petite "0000004A" c'est proche de "00000000" donc nil
C'est l'accès à une propriété d'un objet non instancié ou libéré par FreeAndNil

Merci pour vos réponses, alors je débute sur Delphi donc voilà ce que j'ai fait:
je me suis mise en mode debug et quand je compile y'a aucune erreur mais quand j’exécute j'ai le message alors j'ai essayé de mettre en commentaire pour voir
et j'ai trouvé que c'était dans cette fonction:
Code:

1 2 3 4 5 6 7 8 9 10 with prcSelInfo do begin try Params[0].AsInteger := CurrentPlateId; Open; AssignValues(prcSelInfo, 'MNAGYTEMPERED = 0', VTSelInfoA); AssignValues(prcSelInfo, 'MNAGYTEMPERED = 1', VTSelInfoT); finally Close; end; end;

prcSelInfo a-t-elle bien des paramètres déclarés ?
AssignValues ? qu'est-ce que c'est ?
VTSelInfoA sont-ils instanciés, Est-ce que la valeur est différent de null

voici un code pour chercher l'erreur

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
if not Assigned(prcSelInfo) then
  ShowMessage('prcSelInfo');
 
    with prcSelInfo do 
    try
 
      if Params.Count >0 then
        ShowMessage('Params');
 
      Params[0].AsInteger := CurrentPlateId;
      Open;
 
      if not Assigned(VTSelInfoA) then
        ShowMessage('VTSelInfoA');
 
      AssignValues(prcSelInfo, 'MNAGYTEMPERED = 0', VTSelInfoA);
 
      if not Assigned(VTSelInfoT) then
        ShowMessage('VTSelInfoT');
 
      AssignValues(prcSelInfo, 'MNAGYTEMPERED = 1', VTSelInfoT);
    finally
      Close;
    end;

05/06/2015, 11h06
anapurna
salut

juste un doute sur l'utilité de cette ligne
Code:

1 2 if Params.Count >0 then ShowMessage('Params');
si le nombre de paramètre est supérieur a zero cela ne pose aucun soucis d’accéder a PARAMS[0]
a l'inverse si les paramètre n'existe pas cela pourrez déclencher un plantage
05/06/2015, 12h06
pimouche

Bonjour à tous
Merci pour vos réponses, j'ai trouvé ou était le problème, en faite j'ai mis en place une procédure qui faisait appel à une table de la base de données
que je n'avais pas encore remplis !!!! et je n'avais pas rempli le fichier unit ucorrespondance;en faite c'était vraiment une problème de bibliothèque.
Bonne journée.
Merci encore.