Discussion :

[znathan]

Bonjour!j'ai un composant dérivé de quickRep pour générer dynamiquement en mode liste, des champs d'une entité donnée. En conception quand je fais un préview, j'ai sur mon état ce que je veux. Mais à l'exécution, j'ai une erreur EAccèsViolation sur cette ligne :

nombre := DataSet.FieldCount;

C'est avec le nombre de champ de l'entité (nombre) que je crée les TQRLabel et les TQRExpr. Au travers des explications que j'ai trouvé sur le net, je tente d'accéder à un objet non crée à l'exécution vue l'erreur obtenue.

Quelques pistes de solutions?

[ALWEBER]

Mets nous un peu plus de code que l'on puisse t'aider

[znathan]

D'accord!

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
   TMyFields = record
    exp: array of TQRExpr;
    lab: array of TQRLabel;
  end;
 
type
  ZTQuickRep = class(TQuickRep)
 
 public
 
    function CreateListeFields(monExpr : TQRExpr ; monLabel : TQRLabel; Band :
        TQRBand): TMyFields;

Dans CreateListeFields,

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
 
var
  aFields: TMyFields;
 ...
   nombre := DataSet.FieldCount; //C'EST ICI AVEC LES POINTS D'ARRET //QUE CA CLOCHE
   setLength(aFields.exp,nombre);
   setLength(aFields.lab,nombre);
  ...
for I := 0 to nombre- 1 do
       begin
           aFields.lab[I] := TQRLabel.Create(BandOwner);
           aFields.exp[I] := TQRExpr.Create(BandOwner);
           Result.lab := aFields.lab;
           Result.lab[I].Parent  := mBandColum;
           Result.exp[I].Parent  := mBandColum;
           Result.lab[I].Caption := DataSet.Fields[I].DisplayName;
           Result.exp[I].Expression := DataSet.Fields[I].DisplayName;
  end;
....

mBandColum est une bande détail crée aussi. J'ai raccourci le code mais l’essentiel est là.D'ailleurs c'est au niveau de nombre := DataSet.FieldCount; que j'ai les problèmes.Et comme je l'ai dit, quand je fais un clic droit et préview en conception, les données sont là propres!c'est à l’exécution que ça plante.

[ShaiLeTroll]

As-tu affecté un objet à ce DataSet ?
ce DataSet est-il lié lors de la conception via l'inspecteur d'objet ?
ce DataSet est-il actif ?
ce DataSet a-t-il une DataBase ou une Connexion active ?

[znathan]

ce DataSet est-il lié lors de la conception via l'inspecteur d'objet ?
ce DataSet est-il actif ?
ce DataSet a-t-il une DataBase ou une Connexion active ?

C'est oui à toutes ces trois questions; par contre
As-tu affecté un objet à ce DataSet ? non!

[znathan]

Merci ShaiLeTroll!C'est justement l'affectation d'un objet au DataSet qui bloquait!Désolé d'avoir pollué le forum avec une question basique.Merci encore de ton aide.