Discussion :

[momento85]

Aidez moi SVP à comprendre se que veulent dire ces messages d'erreur , et que dois je faire pour les résoudre ,c'est très urgent

1) violation d'accès à l'adresse 0043FB8 dans le module 'project1.exe'
Lecture de l'adresse 00000004

2)Le projet provoqué une classe d'exception EAcesseViolation avec le message 'violation d'accès à l'adresse' 75016885 dans le module 'comctl32.dll' .Lecture de l'adresse '00000000' . Processus stoppé

3)Le projet a provoqué une classe d'exception EInvalidePointer avec le message 'Opération de pointeur incorrecte' . Processus stoppé

4)Le projet a provoqué une classe d'exception EOsError avec le message 'Erreur système code : 5 Accès refusé' . Processus stoppé



j'ai comme support un stringGrid dans lequel j'enregistre des valeurs au fur et à mesure, et ligne après ligne

j'ai inséré mon code dans un thread pour avoir la possibilité de faire 'pause'


mon code à 5 boucles imbriqué , et s'exécute n fois :

il effectue un test dans la boucle 1 puis il rentre dans la boucle 2
il effectue un test dans la boucle 2 puis il rentre dans la boucle 3
il effectue un test dans la boucle 3 puis il rentre dans la boucle 4
il effectue un test dans la boucle 4 puis il rentre dans la boucle 5
il exécute la boucle 5 puis la 4 , puis 3 puis 2 puis 1 .

[supersnail]

Ils sont beaux tes messages d'erreurs

Sauf, que sans informations complémentaires (par exemple le code de ton projet...), ils ne servent un peu à rien

[ILP]

Tu n'as pas des éléments que tu as oublié de créer avant de les utiliser.
Un truc du style :

Code Pascal :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
var
  MonTableau: TStringList;
  i: Integer;
begin
  for i := 0 to 10 do
  begin
    MonTableau.Add('Un ajout qui plante !');
  end;
end;

Au lieu de :

Code Pascal :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  MonTableau: TStringList;
  i: Integer;
begin
  MonTableau := TStringList.Create();
  try
    for i := 0 to 10 do
    begin
      MonTableau.Add('Un ajout qui marche !');
    end;
  finally
    MonTableau.Free();
  end;
end;

[Just-Soft]

Salut

autant mettre le code !