Discussion :

[** Phil **]

Bonjour à tous,

Dans un projet sous BCB6, j'utilise un TSmallIntArray.

L'allocation avec new se passe bien, mais dès que j'utilise la méthode Add, à l’exécution, j'ai le message suivant :

Project Project1.exe raised exception class ELowCapacityError with message 'The DecisionCube Capacity is low. Please deactivate dimensions or change the data set.'

Je n'arrive pas à trouver la cause de cet échec, quelqu'un a-t-il une idée

Merci

[blondelle]

Salut ** Phil **
Je pense que tu devrais poster le code qui donne l'erreur, apparement tu utilise un TDecisionCube Qui recoit une valeur erronee

[** Phil **]

Ce code basique suffit pour provoquer l'erreur chez moi

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
17
18
19
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include <mxarrays.hpp>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    TSmallIntArray *_t = new TSmallIntArray(0, 0);
    _t->Add(1);
    delete _t;
}
//---------------------------------------------------------------------------

Et je n'utilise pas de TDecisionCube . . . c'est vraiment étrange

[blondelle]

Bizarre, j'ai teste le code de deux manieres et je n'ai pas d'erreur

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
17
18
19
20
21
22
23
 
#pragma hdrstop
#include "Unit1.h"
#include <mxarrays.hpp>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
     : TForm(Owner)
{
TSmallIntArray *_t = new TSmallIntArray(0, 0);
_t->Add(1);
delete _t;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TSmallIntArray *_t = new TSmallIntArray(0, 0);
_t->Add(1);
delete _t;
}

Je suis sous BCB6 Window7 64bits
Avant de lancer BCB6 regarde si le fichier projet est bien vide, il ne doit y avoir que deux repertoires Bpl et Lib rien d'autre, le chemin " C:\Program Files (x86)\Borland\CBuilder6\Projects "

[** Phil **]

C'est effectivement très bizarre, chez moi j'ai essayé ce petit code sur mon fixe et mon portable, j'ai la même erreur. Les deux calculateurs sont sous XP pro.

J'ai déjà utilisé des TSmallIntArray chez moi et ça marchait. Je ne vois pas ce que j'ai changé dans les options de Builder 6 ou sur mes machines de plus ça marche à l'asso pour qui je code une application, leurs PC sont aussi sous XP.

En fouillant sur le net, j'ai constaté que certains ont rencontré ce problème, mais je n'ai pas vu de solution

Avec des TList ou des TStringList, je n'ai pas de souci, j'y perds le peu de latin qu'il me reste . . .

[ShaiLeTroll]

Vous ne confondez pas TSmallIntDynArray et TSmallIntArray ?

TSmallIntDynArray correspond au array of SmallInt de Delphi, c'est un type simple, unité Types (ou sysdyn.h)
TSmallIntArray est type interne de DecisionCube (faut la version Entreprise !)

L'exception ELowCapacityError est déclenchée quand le cache d'un cube de décision est trop grand. La mémoire disponible pour le cube de décision peut être augmentée en modifiant la valeur de la propriété Capacity du cube de décision. Il est également possible de diminuer la mémoire utilisée par le cube en désactivant certaines de ses dimensions.

sinon, en c++, il y a aussi std::vector<SmallInt>.

[** Phil **]

J'ai une version Enterprise et je souhaite bien utiliser un TSmallIntArray. Lorsque je touche à la propriété Capacity, j'ai le même message d'erreur.

J'ai essayé ce code avec un TIntegerDynArray qui fonctionne chez moi, merci pour le tuyau. Je ne m'explique cependant pas l'exception déclenchée par le DecisionCube

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
17
18
19
20
21
22
23
24
25
26
27
28
 
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//#include <Sysdyn.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    TIntegerDynArray _t;
    for(int i = 0; i < 10; i++)
    {
        _t.Length += 1;
        _t[i] = i;
    }
    for(int i = _t.Low; i <= _t.High; i ++)
    {
        Memo1->Lines->Add(_t[i]);
    }
    _t.Length = 0;
}
//---------------------------------------------------------------------------

Merci pour votre aide.

[blondelle]

J'ai trouve ceci dans l'aide en ligne

Spécifie le nombre maximum d'éléments qui peuvent être ajoutés au tableau.
__property int Capacity = {read=FCapacity, write=SetCapacity, nodefault};
Description
Initialisez Capacity pour changer la quantité de mémoire allouée pour le tableau. Toute tentative d'initialiser Capacity à une valeur inférieure à celle de la propriété Count déclenche une exception EArrayError.
Si la propriété AutoSize vaut true, la propriété Capacity du tableau augmente automatiquement si nécessaire pour tenir compte des nouveaux éléments ajoutés.
Remarque : Pour déterminer la quantité de mémoire utilisée par le tableau, utilisez Capacity * ItemSize

C'est peut etre ton probleme

[** Phil **]

Juste après l'allocation j'ai

Count = 0
Capacity = 0
AutoSize =true
ItemSize = 2

Si je fais _t->Capacity = 1; je provoque l'exception

[totoche76]

Hello,

La question qui tue: Tu as combien de mémoire sur les PC où ça foire ??
Plus de 2 Go ??

C'est un bug de nain dans la VCL (cf. QualityCentral - le rapport de bug concerne Delphi, mais c'est pareil pour Builder)

Mets l'unité DecisionCubeBugWorkaround.pas dans ton projet, et ça devrait aller.

C'est effectivement très bizarre, chez moi j'ai essayé ce petit code sur mon fixe et mon portable, j'ai la même erreur. Les deux calculateurs sont sous XP pro.

J'ai déjà utilisé des TSmallIntArray chez moi et ça marchait. Je ne vois pas ce que j'ai changé dans les options de Builder 6 ou sur mes machines de plus ça marche à l'asso pour qui je code une application, leurs PC sont aussi sous XP.

En fouillant sur le net, j'ai constaté que certains ont rencontré ce problème, mais je n'ai pas vu de solution

Avec des TList ou des TStringList, je n'ai pas de souci, j'y perds le peu de latin qu'il me reste . . .

[** Phil **]

Bingo merci Totoche76 ça marche en ajoutant le DecisionCubeBugWorkaround.pas au projet.

Alors, pour aller un peu plus loin,

- chez moi les PC ont 2 et 3 Go de RAM, j'ai le bug
- a mon asso ils ont 2 Go de RAM et ça marche sans bug.
- toutes les machines sont sous XP Pro SP3

La différence, chez moi j'ai de l'Intel à l'asso de l'AMD, est-ce une explication . . .

En tout cas, merci à tous pour votre aide.