Discussion :

[Higgins]

Bonjour à toutes et à tous,

Je rencontre un problème avec un TBindSourceDBX.
J'ai un composant TBindSourceDBx dont le subSQLDataset exécute une procédure stockée.
Ce TBindSourceDBx est lié à une grille dans laquelle s'affichent les données.
Jusqu'ici tout va bien (comme dirait l'autre).
Lorsque l'utilisateur clique sur une ligne, j'ai besoin de récupérer la valeur d'un champ( qui n'est pas affiché dans la grille). je fais donc ceci:

Code :

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

1
2
 
mavariable:=BindSourceDBX1.DataSet.FieldByName('VOLUME_ID').AsInteger;

L'évaluation de BindSourceDBX1.DataSet.FieldByName('VOLUME_ID').AsInteger; via CTRL+F7 m'indique bien la bonne valeur. par contre à l'exécution, j'ai le message d'erreur

EDatabaseError: BindingSource.SubClientDataSet:champ 'VOLUME_ID' non trouvé

ça ne m'étonne qu'à moitié puisque je travaille avec subSQLDataset et pas subClientDataset. Le problème c'est que si je modifie mon code comme ceci, pour accéder directement à subSQLDataset

Code :

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

1
2
mavariable:=BindSourceDBX1.subSQLDataSet.FieldByName('VOLUME_ID').AsInteger;

son état est dsinactive (au lieu de dsBrowse) dans le premier cas et du coup, je récupère le message suivant:

EDatabaseError: BindingSource.SubSQLDataSet:champ 'VOLUME_ID' non trouvé

Avez-vous une idée de la cause de ce problème?

[Higgins]

Je me consume de honte au point que j'hésite à vous livrer la cause du problème

Au mépris de toute règle de base, l'affectation de ma variable était faite dans une clause With ... do qui concernait un objet contenant lui aussi un TBindSourceDBX qui portait le même nom.
Devinez lequel j'essayais d'affecter à ma variable..