Version imprimable
bj a tous j'ai une app delphi BDD Access qui contient un cinq champ (hono, depense, totalH, TotalD, TotalG) j'ai fais des requete pour calculer les champs hono et Depense ça marche bien mais quand je voudrai savoir comment faire pour faire ce calcule en précisnat une date dans le DateTimePicker, ou bien de DAteTime Picker , genr (du...... au.......); et aussi pour filtrer les champs avec des date ?
merci a tous
Dans ta requête :
et dans ton code, tu passes les valeurs aux paramètres :Code:WHERE MADATE BETWEEN :DateDebut AND :DateFin
Code:ParamByName ('DateDebut') .AsDateTime := DateTimePickerDebut .Date;
Slt et merci pour ta réponse mais peux tu m'espliquer qq chose
pk dois je mettre paramByName je ne stocker pas les dates dans la base de donnée, ou alors je n'ai rien pigé.
merci encore
Je pensais que tu avais oublié de mentionner les champs Date de ta base. Mais si vraiment si tu ne stockes pas les dates dans la base, comment veux-tu filtrer sur les dates :?
désolé oui je stock la date d'insertion je viens d'essayer le code me renvoi un résultat 0 et quadn j'essayes le ParamByName il me dit non déclaré, alors stp si tu peux me donner plus de précision, voici le code
pour l'insertion des données:
DM.ACaisse.Insert;
DM.ACaisse.FieldByName('dateJ').AsDateTime:=Date;
DM.ACaisse.Post;
et pour le calcule:
with DM.ACaisse do
begin
Close;
with SQL do
begin
Clear;
Add('SELECT SUM(Hono) as TotalH, SUM(Depenses) as TotalD From Recette where DateJ BETWEEN:DDebut AND :DFin');
Open;
end;
Edit3.Text:=FloatToStr(DM.ACaisse.FieldByName('TotalH').AsCurrency);
Label7.Text:=FloatToStr(DM.ACaisse.FieldByName('TotalD').AsCurrency);
Label8.Text:=FloatToStr(StrtoFloat(Edit3.Text)-StrToFloat(label7.Text));
NB: si je n'utilise pas le filtrage de date il calcule bien
alors si tu peux voir ce qui cloche dans ce code
merci
Ca devrait marcher comme ça : il faut :
1° Spécifier les paramètres dans ta requête.
2° Leur passer une valeur avant l'exécution.
Code:
2
3
4
5
6
encore un pb j'espere que je ne t'embete pas et désolé if result:=true
mais il y a tj le ParamByName identificateur non déclaré
Tu dois avoir un problème avec tes with. Eviter de les emboîter, ça n'améliore pas la lisibilité du code :D
Je suppose que ACaisse est un Query ?? Si tu l'appelais par ex QrCaisse, ça serait plus lisible (pour toi et pour les autres).Code:
2
3
4
5
6
7
8
9
10
11
ParamByName n'existe pas dans les propriété du query je suppose
Ce n'est une propriété, mais une fonction !
Voici ce que dit l'aide Delphi.
Citation:
Accède aux attributs du paramètre de nom spécifié.
function ParamByName(const Value: String): TParam;
Description
La méthode ParamByName permet de consulter ou de définir les attributs d'un paramètre identifié par son nom.
Value indique le nom du paramètre dont il faut obtenir les attributs.
ParamByName permet d'abord de définir ou de consulter la valeur d'un paramètre à l'exécution. Par exemple, l'instruction suivante place dans une boîte de saisie la valeur en cours du paramètre nommé «Contact» :
Edit1.Text := Query1.ParamByName('Contact').AsString;
Les paramètres utilisés dans les instructions SELECT ne peuvent être à NULL, mais ils le peuvent pour les instructions UPDATE et INSERT.
est ce que je dois déclarer une fonction ou qqchose pour que le programme accepte query.paramByName ??
parceque jusqu'a présent il ne veut rien savoir tj le message identificateur non déclaré.
j'ai trouvé ce qui cloche
paramByName et une fonction de Query de la BDE mais moi j'utilse AdoQuery de ADO
merci pour ton aide
il n y aurait pas un truc pareil avec les composant ADO ????
:f1::lol:Code:AdoQuery.Parameters.ParamByName ('...').Value := ...
merci a tous
je l'ai trouvé.
:king: N'oublie pas de mettre le flag :resolu:
Bon courage pour la suite !
au faite je n'ai pas tout a fait résolu le pb je n'arrive pas a récuperer les resultats des calcules j'ai essayé de créer des champs calculé pour le adoquery ç ne marche pas j'ai ajouté dans parameters deux pour stocker les calcule pour les récuperer dans des edit mais ça ne marche pas je suis perduuuuuuuuuuuuu
merci pour ton aide
Je ne comprends pas. Tu as dans ton Query les champs TotalH et TotalD. Il suffit que tu branches dessus des DbEdit (par l'intermédiaire d'un DataSource.
Restera le 3ème résultat (la différence des deux autres), pour lequel tu peux effectivement utiliser un champ calculé.
Qu'est-ce qui te pose pb exactement ?
voila j'ai une BDD access dont j'ai mis trois champs DateJ, Hono, Depenses,
relié a un adoquery quand j'insere des donnée ça marche bien
j'ai crée dans le adoquery deux champ calculé TotalH et TOtalD pour récuperer le SUM(Hono) et le SUM(Depense) mais quand je fais je ne c pas les autre champs DateJ et Hono Depenses ne sont plus reconnu
alors je les ai crée dans le adoquery avec currency comme type et pour l'insertion et l'affichage impeccable avec meme le symbole de l'EUro, mais quand je fais le calcule ça ne marche pas il me sort un msg genre deux valeur pour un champs requis et pourtant aucun n'est requis dans mon app? je ne c pas je crois que je suis totalement a coté de la plaque. merci si tu peux m'aider à m'en sortir
Je ne comprends pas. Tu as dans ton Query les champs TotalH et TotalD. Il suffit que tu branches dessus des DbEdit (par l'intermédiaire d'un DataSource.
Restera le 3ème résultat (la différence des deux autres), pour lequel tu peux effectivement utiliser un champ calculé.
Qu'est-ce qui te pose pb exactement ?
c bon j'ai reglé le pb et ça marche trés bien merci a tous pour votre aide