Discussion :

[fredfred]

Bonjour,

J'ai un soucis avec une requête ADO dont le résultat est affiché dans une grille.

Cette requête contient des champs calculés, et possède une fonction OnCalcFields.

J'ai besoin de pouvoir modifier manuellement la valeur des champs calculés de l'enregistrement courant, donc je fais :

Code :

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

1
2
3
4
5
6
 
              Q_Declinaison.disablecontrols;
              Q_Declinaison.Edit;
              Q_Declinaison.FieldByName('CA_Access').AsInteger:=Q_Declinaison.FieldByName('CA_Access').AsInteger+10;
              Q_Declinaison.Post;
              Q_Declinaison.enablecontrols;

Le problème, c'est qu'au moment du post, la query va passer dans son OnCalcFields pour TOUS les enregistrements affichés dans la grille, ce qui est super long.

Comment faire pour que le OnCalcFields ne se fasse que sur l'enregistrement qui vient d'être modifié ??

La présence ou absence des enable/disable controls ne change rien.

La requête tape dans une base SQL server, en direct via une ADOConnection, pas de BDE, pas d'ODBC.


Merci d'avance

[freud]

bonjour,

champ calculer au niveau de SQL SERVER (computed) ?
Il me semble que l'on ne peut modifer directement un champ calculer et seul les champs impliquant le champ calculer sont modifiable.
Post ton code ..

[fredfred]

champ calculer au niveau de SQL SERVER (computed) ?

Non, champs calculé créé dans la TQuery (FieldKind = fkCalculated)

Il me semble que l'on ne peut modifer directement un champ calculer et seul les champs impliquant le champ calculer sont modifiable.

si si, ça marche trés bien (enfin, avec un champ calculé Delphi)

Post ton code ..

c'est déjà fait..

[Cl@udius]

Salut

Ton champ calculé est CA_Access ?
Si oui, je ne vois pas comment ton code peut fonctionner, puisque la valeur de CA_Access se calcule en faisant référence à sa propre valeur.

@+ Claudius

[fredfred]

Et pourtant, ça marche trés bien.

Dès que je change la valeur de CA_Access, elle s'affiche bien dans la grille.
Et si entre temps je change une des valeurs de la formule du champ calculé, le calcul se fait bien.

Mon problème n'est pas un problème de calcul du champ courant, tous les calculs sont corrects, mais le fait que ce sont tous les champs de la grille qui repassent pas le OnCalcField, d'où un ralentissement conséquent.

[Cl@udius]

Dès que je change la valeur de CA_Access, elle s'affiche bien dans la grille.

Que la situation soit vraiment claire, j'ai peur de ne pas bien saisir:

• Le champ AC_Access est-il ton champ calculé ?
• Le code que tu as posté dans ton 1° message est-il l'implémentation de OnCalcField ?

@+ Claudius

[fredfred]

Oui, CA_Access est bien le champ calculé.

Sa valeur est déterminée, soit par le OncCalcfield, soit par les incrémentations que je fais manuellement à divers endroits du programme.

Le code que j'ai posté n'est pas le OnCalcField, c'est juste un exemple d'incrémentation ponctuelle.

[Cl@udius]

Bon je ne comprends pas ta façon de procéder.

Quelques règles à ne pas oublier:

1. Un champ calculé se base sur les données physiques de la table, donc calculé à l'aide des champs de type fkData uniquement. Pas d'appel à sa propre valeur (éventuellement avec un autre champ calculé, évalué précédemment).
2. On ne met jamais de Edit/Post dans un évènement OnCalcField.
3. Pour rappel: un champ calculé est une donnée volatile

Voici un exemple bateau d'utilisation d'un champ calculé.

2 champs physiques (fkData): TotalHT, TauxTVA
2 champs calculés (fkCalculated): TotalTVA, TotalTTC

Code :

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

1
2
3
 
  FieldByName('TotalTVA').AsCurrency := FieldByName('TotalHT').AsCurrency * FieldByName('TauxTVA').AsFloat;
  FieldByName('TotalTTC').AsCurrency := FieldByName('TotalHT').AsCurrency + FieldByName('TotalTVA').AsCurrency;

C'est tout.
Faire Un Edit/Post déclenche l'évènement OnCalcField. D'où très certainement tes problèmes de lenteur.

@+ Claudius

[fredfred]

Un champ calculé se base sur les données physiques de la table, donc calculé à l'aide des champs de type fkData uniquement. Pas d'appel à sa propre valeur (éventuellement avec un autre champ calculé, évalué précédemment).

Je sais, mais on peut modifier la valeur dun champ calculé en dehors du OnCalcField. C'est ce que je fais, et ça marche.

On ne met jamais de Edit/Post dans un évènement OnCalcField.

Je sais, et je n'en ai pas.

Pour rappel: un champ calculé est une donnée volatile

Je sais, et ça me vas bien.

Faire Un Edit/Post déclenche l'évènement OnCalcField.

Normal.

Mais j'en revient à mon problème, qui est que le post déclenche le OnCalcField de tous les enregistrements de la grille, pas seulement celui qui vient d'être modifié.

[Cl@udius]

Re,

Je sais, mais on peut modifier la valeur dun champ calculé en dehors du OnCalcField. C'est ce que je fais, et ça marche.

Quel est l'intérêt de définir la valeur d'un champ calculé en dehors du OnCalcField. Je me demande si le champ calculé est vraiment adapté à ton besoin.

Mais j'en revient à mon problème, qui est que le post déclenche le OnCalcField de tous les enregistrements de la grille, pas seulement celui qui vient d'être modifié.

En réalité le OnCalcField ne se déclenche pas pour tous les enregistrements de la requête mais uniquement sur ceux qui sont visibles sur ta DBGrid.

Dans la mesure du possible, j'évite d'utiliser les champs calculés sauf sur des jeux d'enregistrement très restreint. Sinon cela devient vite très lourd.
Soit je calcule mon champ dans la requête, ou bien je défini un champ calculé directement au niveau de la BDD.

@+ Claudius

[fredfred]

Re,
Quel est l'intérêt de définir la valeur d'un champ calculé en dehors du OnCalcField. Je me demande si le champ calculé est vraiment adapté à ton besoin.

J'utilise un champ calculé parce que ma reqûete est une jointure sur trois tables, et le champs calculé en question est un compteur d'opérations effectuées par l'utilisateur à un moment donné.

A l'ouverture de la requête, le calcul est initialisé par le nb d'enregistremts présents dans différentes tables. Mais l'ajout ou la suppression d'enregistrements dans ces tables doit se refléter immédiatement dans la grille principale, sans pour autant relancer toute la requête, d'où le champ calculé que je modifie manuellement, et encore une fois, ce système fonctionne bien.

Le stockage de cette valeur dans la BDD n'a aucun interêt, et compliquerait d'autant plus l'affichage de la grille.

En réalité le OnCalcField ne se déclenche pas pour tous les enregistrements de la requête mais uniquement sur ceux qui sont visibles sur ta DBGrid.

C'est bien ce que j'ai dit

[freud]

as-tu essayer de désactiver le AutoCalcfields au moment oû tu n'as pas besoin et de le réactiver par la suite ?

Code :

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

1
2
3
 
AutoCalcfields:=False ;
AutoCalcfields:=True ;

[Kaféine]

Salut,

AutoCalcFields à false peut réduire les appels a OnCalcFields, enfin il me semble.

[fredfred]

AutoCalcField est figé à False dès le départ, et je n'y touche pas.