pierrecoulon
Messages postés32Date d'inscriptionjeudi 19 juin 2008StatutMembreDernière intervention11 septembre 2008
-
21 août 2008 à 18:39
pierrecoulon
Messages postés32Date d'inscriptionjeudi 19 juin 2008StatutMembreDernière intervention11 septembre 2008
-
23 août 2008 à 13:25
Bonjour,
je recherche le moyen de filtrer une requête adoquery en pernant une variable de mon programme comme paramètre.
j'ai essayer avec l'option filter mais sans succes.
Quelqu'un pourrait-il m'éclairer.
Merci
RURUInc
Messages postés42Date d'inscriptionjeudi 21 février 2008StatutMembreDernière intervention21 octobre 2008 21 août 2008 à 22:31
Autre chose quand mème
Pourkoi tu rempli tes EDIT avant que tu filtre ta requête, je pige pas l'intérêt !!
tu devrai placer tes EDIT apres le Open !! normalement.
bref, pour récupérer tes valeur tu peux aussi faire cela
Edit2.text := ADOQuery1.FieldByName('Nom_Societe').AsString;
si tu ne connais pas le numéo de champs.
Autre exemple requete Query valable
refrence := '00034'; // Evidemment c'est un STring
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM Salarie');
ADOQuery1.SQL.Add('WHERE Code=:MonFiltre);
ADOQuery1.Parameters.ParamByName(MinFiltre) := reference;
ADOQuery1.Open;
Edit2.text := ADOQuery1.Fields.Fields[1].AsString; // J'envoi une donné dans EDIT1.text
2 choses
1) apres le Open il est probable qu'il y est plusieur réponse alors il faudra parcourir ta requete genre :
While ADOQuery1.EOF do
Begin
edit2.text := ADOQuery1.Fields.Fields[1].AsString; // sa va aller vite lol
ADOQuery1.next
end;
2) Pense à fermer ton Query aussi
ADOQuery1.Close;
RURUInc
Messages postés42Date d'inscriptionjeudi 21 février 2008StatutMembreDernière intervention21 octobre 2008 21 août 2008 à 20:49
Pour filtrer un, ADOQuery
Evidement, je concidère que la connexion a ton query est valide
ADOQuery1.SQL.clear; // (au cas ou tu autais quelquechose dedans)
ADOQuery1.SQL.Add('SELECT Code, Nom, Prenom FROM MaTable');
ADOQuery1.SQL.Add('Where Nom=:Marecherche');
ADOQuery1.Parameters.ParamByName(MaRecherche) := Edit1.text;
ADOQuery1.Open; // <-- Là ta requete est filtrer ta pu qu'a la parcourir
Il y a pas d'autre méthode mais celle-ci est facile a comprendre.
pierrecoulon
Messages postés32Date d'inscriptionjeudi 19 juin 2008StatutMembreDernière intervention11 septembre 2008 21 août 2008 à 21:58
il me met ces deux messages...
[Erreur] Dlg_Fournisseur.pas(146): La partie gauche n'est pas affectable
[Erreur] Dlg_Fournisseur.pas(146): Types incompatibles : 'TParameter' et 'TCaption'
Vous n’avez pas trouvé la réponse que vous recherchez ?
ADOQuery1.SQL.clear; // (au cas ou tu autais quelquechose dedans)
ADOQuery1.SQL.Add('SELECT * fournisseurs');
ADOQuery1.SQL.Add('Where Nom_societe =:Marecherche');
ADOQuery1.Parameters.ParamByName(MaRecherche) := Edit2.text;
ADOQuery1.Open; // <-- Là ta requete est filtrer ta pu qu'a la parcourir
DonnerDateActuelle(jour, mois, annee);
ComboBox1.ItemIndex := jour - 1;
ComboBox2.ItemIndex := mois - 1;
ComboBox3.ItemIndex := annee - 2000;