Total d'une dbgrid

Question

Salut, je suis un débutant dans la programmation Delphi
Mon problème c est que je n'arrive a afficher le total d'une colonne d'une dbgrid,dans un edit, alors que tout les composant nécessaire sont là.

dans mon datamodule j'utilise un adoquery dans lequel j ai cree un champ total et une datasource1.

dans l'adoquery j ai aussi insère la condition nécessaire à l'affichage de cette somme dans mon edit

select sum(Total) as PatPR
From Pâte

J'espère que mes explication sont clair. Merci d'avance pour votre aide

cs_cantador · Answer

Bonjour,
hé oui, le Tbdgrid n'a pas de zone "totaux" (summary)
il faut donc traiter une requête SQL sur le champ retenu et stocker son résultat par exemple dans un Edit bloqué par un panel (car cette zone ne sera pas saisi manuellement)


procedure total;
begin
With MonQuery.SQL do
begin
Clear;
MonQuery.Close;
Add('Select sum(MonChamp) as Total ');
Add('Form MaTable ');
MonQuery.Open;
Edit1.Text := MonQuery.FieldByName ('Total').asCurrency; (.Value, .Text, as Float, asInteger etc..)
end;
end;


cantador

Luigi1205 · Answer

Tout d'abord merci de ton aide.

Malheureusement je n ai pas réussi a écrire se code car j ai eu une erreur des la premier ligne.

j'aimerai savoir quand tu parle de "monQuery" peut etre de type ADOQuery1 ou Query1

Merci d'avance.

Luigi1205 · Answer

j ai presque résolu le code mais il me dit que DBEdit4 n'est pas déclare

cs_cantador · Answer

Bonjour,

peut etre de type ADOQuery1 ou Query1

Oui bien sûr, peu importe le type de composant du moment qu'il s'agit d'un type Query..

DBEdit4 ?

je ne sais pas, c'est peut-être le nom de ton 
TDBGrid mais que tu n'as pas encore nommé...

cantador

Luigi1205 · Answer

Merci pour t a réponse Cantador

Mais malheureusement j ai un probleme par rapport a la convertion de mon nombre
c est tu comment passe d'un chiffre a virgule a un string vis vers sa comme la fonction inttostring

Merci d'avance

cs_cantador · Answer

bonjour,

il faut mettre du code..

cantador

cs_ghodbane · Answer

Essaye par edit1.Text:=IntTostr(Table1.RecordCount); vous recever le nbre de ligne de la table bien sur le dbgrid

Total d'une dbgrid

7 réponses

Votre réponse

Discussions similaires