Discussion :

[rostomides]

bonjour,
je debute avec les base de données sous delphi, et je vous prie de m'aider.
je dois creer une bdd comprenant trois champs:
nom
date
montant gagné...
ceci etant deja fais...
maintenant, je voudrais que mon programme recherche et mette dans un une "grid" a part qui sera placé dans une autre "form" tous les noms enregistrés a la date x que j'introduirais dans un "edit" et surtout qui'il affiche a la fin de la liste la somme de tout les montants enregistrés a cette date et ce apres un simple clic sur un bouton "rechercher"..
nb: je travail avec delphi 7...
merci a l'avance..
je tiens juste a dire que votre site egal son pesant d'or, continuez comme ça vous faites du super travail....

[aityahia]

afin de pouvoir vous aider donne nous la type de base de données, et le type de conexion (ADO,BDE...ect)....

[rostomides]

salut,
dans ma fiche principale j'utilise un ttable avec 3 "dbedit" histoire d'editer ma table biensure.
je voudrais a l'aide d'un bouton (rechercher) appeler une autre form avec la methode "showmodal" qui affichera les données recherchée.
priere aussi de me donner la meme solution mais en utilisant un tquery . je te remercie a l'avance.....

[aityahia]

Solution 1:

vous placer une autre TTable2 conecté a votre base dans levenement en Onclick du boutton vous faite :

Code :

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

1
2
3
4
 
 Table2.Filter := 'Date ='+QuotedStr(valeurdate);
 Table2.Filtered:= True;
 Form2.ShowModal;

Bien sur le Dbgrid placer dans la deuxieme fiche doit etre lier a TTable

[aityahia]

solution 2:

au lieu du TTable vous placer un TQuery avec le code SQL suivant

Code :

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

1
2
 
SELECT * FROM nomphysiquetable WHERE (Date = :DateParm

le ateParm est un parametre

et dans l'évenement en click du button

Code :

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

1
2
3
4
5
 
 
Query1.close;
Query1.ParamByName('DateParm ').AsDateTime := ValeurDate;
Query1.Open;

[rostomides]

merci bqps pour votre aide, je vous informerai de la suite apres avoir essayé.....