Champ calculé et paradoxRésolu

Question

Bjr
Voila j'ai un table paradox avec la structure suivante:
1-id----------------> integer----->*indexer
2-compteur-------->integer------>*indexer
3-Raison----------->Alpha-------> 40
4-Somme---------->$ monetaire
5-Total ----------->$ monetaire

la table est relier en mode mastersource avec un table Maitre, et les champs sont afficher dans un composant dbgrid!!

le probleme c'est comment calculer la somme des enregistrement qui se trouve dans cette dbgrid apres chaque insertion d'un nouveau enregistrement est afficher dans le champ Total qui est aussi de type monetaire($).
Merci d'avancement.

abdelmoumene djezar

cs_cantador · Accepted Answer

Je te conseille de commencer à utiliser les TQuery plutôt que les TTable..
A l'usage, tu verras que ces derniers t'offriront plus de possiblités et de performance.

cantador

cs_cantador · Answer

En principe on met le total en bas de la colonne mais nous ne savons pas ton besoin réel..
et le TdbGrid ne dispose pas de footer..
il te faudrait pour ça un grid plus élaboré..

Mais tu peux aussi tout simplement mettre un edit en base de la colonne


Et afficher le total avec une requête SQL
MonQuery.Close;
MonQuery.Open;
with MonQuery  do
begin
Clear;
Add('SELECT sum(Somme) as TOTAL ');
Add('FROM  Matable  ');
MonQuery.ExecSQL;
end;
et
Edit1.text := MonQuery.FieldByName('TOTAL').Value;

je n'ai pas testé mais çà doit marcher..

cantador

cs_abdousoft · Answer

Slt 
Merci pour votre reponse mais s'il trouve une autre methoda deferente a l SQL c'est mieu avec TTable;
ET merci d'avancement

THANKS

cs_Delphiprog · Answer

@Cantador : quand on utilise l'instruction SELECT en SQL, il faut utiliser la méthode Open du composant TQuery et non ExecSql (réservé aux requêtes qui ne renvoient pas de curseur comme update, insert ou delete).

Je rejoins les collègues pour dire qu'une requête est sûrement la meilleure réponse à la question posée 

May Delphi be with you !
<hr color="#008000" />
Pensez à cliquer sur Réponse acceptée lorsque la réponse vous convient.
http://www.afipa.net/

khawarizm · Answer

Bonsoir ;
 Moi aussi je pense qu'une requête est
sûrement la meilleure réponse à la question posée mais,  tu veux toujours utiliser une TTable au lieu
de Requête SQL tu peux le faire en utilisant un 
TDataSetProvider, un  TClientDataset

  et les 

aggrégats Voilà
un tutorial qui parle de ça : http://alphomega.developpez.com/Agregats/tutoriel/.



 Pensez à cliquer sur Réponse acceptée lorsque la réponse vous convient.

cs_cantador · Answer

@delphiprog :
Oui c'est vrai tu as raison la doc le précise, mais il m'arrive d'utiliser les deux sans difficulté jusqu'à présent...
cantador

Champ calculé et paradox

6 réponses

Votre réponse