calcul valeur champs de toute la table

Question

j'ai une table produit qui contient un champ prix_achat_pro
ce que je veut obtenir a traver un query c'est la somme de ce champ
c a d

desi   prix_acht
P1     1200
P2     900
P3     5000

et mettre la somme des prix dans un Tedit=7100

j'ai essayer ce code
with query1.SQL do
begin
Add('SELECT SUM(Prix_Achat_Pro)');
Add('FROM Produit');
query1.open
end;

edit1.text:=currtostr//je trouve pas quoi mettre ici par ce que j'ai pas de champs pour remettre la valeur trouver par la requette

merci

cs_cantador · Answer

bonjour,


with query1.SQL do
begin
Add('SELECT SUM(Prix_Achat_Pro) as totalHT ');
Add('FROM Produit ');
query1.open
end;

edit1.text:= CurrToStr(Query1.FieldByName('totalHT').Value);


il vaut mieux utiliser la fonction format..

cantador

siahmedaek · Answer

bonjour
dans mon cas j'ai pas besoin de stocker le resultat dans un champs(puisque je n'ai pas un autre champs champs ex 'totalHt'
Add('SELECT SUM(Prix_Achat_Pro) as totalHT ');
c'est juste pour l'affichage dans un Edit

cordialement

cs_cantador · Answer

ben, tu as la réponse :


edit1.text:= CurrToStr(Query1.FieldByName('totalHT').Value);



cantador

siahmedaek · Answer

merci Cher Contador..

j'ai trouver la sollution a mon pro on Utilisant une autre methode
var resultat,taux:currency;
begin

    table_pro.First;
    resultat:=0;
    while not table_pro.eof do
    begin
    table_pro.Open;
    resultat:=resultat+table_promontant.value;
    table_pro.next;
    end;
   edit2.text:=currtostr(resultat);
   taux:=strtocurr(edit2.text)*2.5/100;
   edit3.text:=currtostr(taux);

Calcul valeur champs de toute la table

4 réponses

Votre réponse

Discussions similaires