Discussion :

[colorid]

Bonjour à tous,

Après avoir ajouté quelques lignes dans l'interface d'une unité j'obtiens une interruption de la compilation qui se faisait pourtant correctement avant cette nouvelle écriture. Voici ce que m'affiche le journal des evenements :

Sorties du débogage : *** A stack buffer overrun occurred in "C:\WorkFiles\Developpement\PeekISODLL_2\TestExe\PeekIso.exe" : Processus PeekIso.exe (4956)
Sorties du débogage : This is usually the result of a memory copy to a local buffer or structure where the size is not properly calculated/checked. Processus PeekIso.exe (4956)
Sorties du débogage : If this bug ends up in the shipping product, it could be a severe security hole. Processus PeekIso.exe (4956)
Sorties du débogage : The stack trace should show the guilty function (the function directly above __report_gsfailure). Processus PeekIso.exe (4956)
Sorties du débogage : *** enter .exr 77B09320 for the exception record Processus PeekIso.exe (4956)
Sorties du débogage : *** then kb to get the faulting stack Processus PeekIso.exe (4956)

Voici les liges ajoutées dans l'interface de l'unité :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
const
  _ColorLevels = 4;// Nombre de niveaux sur les 256 bits des primaires
  _DimColorsVec = _ColorLevels*_ColorLevels*_ColorLevels;// dimension vecteur
  _R = 0; // N° d'ordre de la valeur R dans TPeekSigmaRGBVec
  _G = 1; // N° d'ordre de la valeur G dans TPeekSigmaRGBVec
  _B = 2; // N° d'ordre de la valeur B dans TPeekSigmaRGBVec
 
type
 
  // Nombre de pixels par combinaison des _ColorLevels sur chaque primaire
  TPeekNbrColorsVec = array[0..Pred(_DimColorsVec)] of Integer;
  // Sommations des R,G,B par combinaison des _ColorLevels sur chaque primaire
  TPeekSigmaRGBVec = array[0..Pred(_DimColorsVec),_R.._B] of Integer;
  // Couleur moyenne par combinaison des _ColorLevels sur chaque primaire
  TPeekColorsVec = array[0..Pred(_DimColorsVec)] of TColor;

Quelqu'un peut-il m'expliquer où est l'erreur ?

Merci d'avance à tous

Colorid

[Aos]

Faudrait aussi peut etre mettre tes nouvelles lignes

A moins que quelqu'un ait deja eu ça...

[Eric Boisvert]

Sous Delphi 5, ça compile sans probleme...

Essaie d'enlever l'instruction Pred() dans la definition des tableaux...

Code :

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

1
2
3
4
5
6
7
8
9
 
 
type
  // Nombre de pixels par combinaison des _ColorLevels sur chaque primaire
  TPeekNbrColorsVec = array[0..(_DimColorsVec-1)] of Integer;
  // Sommations des R,G,B par combinaison des _ColorLevels sur chaque primaire
  TPeekSigmaRGBVec = array[0..(_DimColorsVec-1),_R.._B] of Integer;
  // Couleur moyenne par combinaison des _ColorLevels sur chaque primaire
  TPeekColorsVec = array[0..(_DimColorsVec-1)] of TColor;