Filtrage d'un nombre d'un simple Edit pour un autre champ
cs_strong2000
Messages postés1Date d'inscriptionsamedi 30 octobre 2010StatutMembreDernière intervention30 octobre 2010
-
30 oct. 2010 à 21:33
cs_cantador
Messages postés4720Date d'inscriptiondimanche 26 février 2006StatutModérateurDernière intervention31 juillet 2021
-
2 nov. 2010 à 12:44
Je suis un jeune Étudiant. Pouvez-vous m'apporter correction sur ce code s'il vous plaît.
J'ai deux champs dans ma base pour lesquels ils sont appelés: "Annexe" et "Compte".
Dans ce petit code j'essaie de dire: prends le chiffre qui apparaît dans Edit1 et fait une recherche dans le champ "Compte" et regarde s'il y a un nombre de chiffre commençant par le (ou les) chiffre(s) trouvé(s) dans Edit1. Si tu le trouves additionne tous ce genre de nombre qui commence seulement avec le nombre trouvé dans edit1.
Par exemple: Dans Edit1 = 38 et alors dans le champ "Compte" même si on trouve 38999, 7352, 38520. Les valeurs à prendre ne seront que 38999 et 38520.
voici mes codes:
var a : double;
if Journalier.Filter:='contas_deb>' +quotedstr(edit1.Text);
Journalier.Filtered:= True;
then begin
Journalier_razao.Filter:='compte=' +quotedstr (Edit1.Text); Journalier.Filtered:=True;
a:= 0;
While not Journalier_razao.Eof do begin
a:= a+Journalier_razao.fieldByName('compte').AsFloat;
Journalier.Next;
end;
Edit2.Text:= FloatToStr(a);
Journalier.Filtered:= false;
Journalier.First;
Journalier.Filtered:= false;
En un mot; l'addition marche. Seulement j'arrive pas à faire la liaison logique de ces deux rubriques.