Comment filtrer avec .filter dans une ADO Table ?Résolu

Question

Bonjour &#224; tous,


Je transforme mes bases Access BDE en ADO. Tous mes filtres fonctionnant parfaitement en BDE ne m&#146;affichent plus aucunes donn&#233;es dans ma DBGRID depuis le passage en ADO.


Je me rends compte, apr&#232;s avoir surf&#233; sur diff&#233;rents forums que je ne suis pas le seul dans le cas.Voici ma programmation &#133; rien de plus simple ?!


 


adotable1.Filter:= 'Nom=' + quotedstr(edit2.Text+'*');


adotable1.Filtered := true;


Pouvez-vous m&#146;aider ? 
Bien grand merci !!!!

cs_crsi · Accepted Answer

Tout d'abord, je te remercie de me venir en aide ...
Je suis certain que ta requ&#234;te et parfaitement cod&#233;e, mais la dbgrid n'affiche toujours rien ! Pourrais-tu me donner tous les &#233;l&#233;ments de connexion pour que celle-ci affiche le r&#233;sultat !
Moi j'ai ... TDataSource li&#233; &#224; un TADOQuery ...
Merci.

cs_tigrou19 · Answer

Salut,

Essais comme &#231;a

AdoQuery1.active:=false;

AdoQuery1.Sql.text:='Select * from tatable Where Nom Like "'+Edit2.text+'%"';

AdoQuery1.active:=true;



filtre tout les noms qui commence par

@+

cs_abdenour123 · Answer

with ADODataSet1 do begin
Filter :='Ligne_compte ='+QuotedStr('1');
Filtered:=true;

its better

nn2009 · Answer

salut à tous
j'ai un problème que personne n'a pu me donner la bonne réponse
voila: je filtre ma table sur deux editeurs mais pas en même temps, un seul à la fois.
le 1er devra contenir un code qui est un entier
le second devra contenir un nom  qui est un string, alors filtrer la table sur un string c'est facile mais sur un entier C comme voyager dans le temps, 
j'utilise l'événement OnChange Edit des 2 editeurs
le 1er code source est:
procedure TModifier_Patient.Edit1Change(Sender: TObject);
begin
Adotable1.Filtered:=false;
if edit1.Text ='' then exit;
AdoTable1.Filter := 'CODE_PATIENT LIKE'  + QuotedStr(Edit1.Text + '%');
AdoTable1.filtered := True;
end;
le second est :
procedure TModifier_Patient.Edit2Change(Sender: TObject);
begin
Adotable1.Filtered:=false;
if edit2.Text ='' then exit;
AdoTable1.Filter := 'Nom_Patient LIKE ('+''''+edit2.Text+'%'+''''+')';
AdoTable1.filtered := True;
end;
lorsque j'e'xecute la 1ere fois et je filtre sur le code(entier) ça marche et lorsque je vais sur le second edit pour filtrer sur le nom ça marche aussi mais des que je reviens au 1er edit pour refiltrer sur un entier(code) ça foire, ma table ne contiens que les enregistrements dont j'ai filtré dérnièrement dans le 2eme edit .
coment faire !?

tabtah · Answer

merci ca marche parfaitement

Comment filtrer avec .filter dans une ADO Table ?

5 réponses

Votre réponse

Discussions similaires