Discussion :

[Invité]

bonjour,

j'essaie d'effectuer un filtre sur un cds, j'utilise le code suivant :

Code :

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

1
2
3
CDSClient.FilterOptions := [foCaseInsensitive];
CDSClient.Filter        := 'nom LIKE ' + quotedStr('%' + edtRecherche.Text + '%');
CDSClient.Filtered      := True;

ce code me renvoie l'erreur suivante : "Non concordance de type dans l'expression"

avez-vous une idée de ce qui ne va pas dans mon code ?
merci

[Papy214]

Il faudrait préciser la version de Delphi, le type de connexion (BDE, ADO, etc.).

Je viens de faire un test avec ADO sur XE2 et une table clients, aucun problème. Le filtre est appliqué sans erreur.

[Invité]

effectivement, je n'ai rien précisé.

j'utilise d7.
je me connecte sur une base access avec un Tadoconnection (AdoConn).
je passe ensuite par un tadoquery (qFiltre) dans lequel j'ecris ma requete, un tdatasetprovider (DSPFiltre), un tclientdataset (CDSFiltre) et un tdatasource (DTSFiltre).

j'essaie d'appliquer le filtre sur le CDSFiltre.

[Invité]

apparemment le problème vient lorque l'on utilise 'like', si je met '=', cela fonctionne.

avez-vous une idée pour résoudre ce problème ?

a+
ben

[Papy214]

peut-être une solution ici:

http://www.developpez.net/forums/d11...buez/sql-like/



.. euh .. Quoique .... en fait non !

PAr contre, la doc confirme que LIKE n'est pas pris en charge

http://docwiki.embarcadero.com/RADSt...ilter_Property

[Ph. B.]

Bonjour,

j'essaie d'effectuer un filtre sur un cds, j'utilise le code suivant :

Code :

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

1
2
3
CDSClient.FilterOptions := [foCaseInsensitive];
CDSClient.Filter        := 'nom LIKE ' + quotedStr('%' + edtRecherche.Text + '%');
CDSClient.Filtered      := True;

ce code me renvoie l'erreur suivante : "Non concordance de type dans l'expression"

avez-vous une idée de ce qui ne va pas dans mon code ?

La construction de l'expression de filtre est correcte, mais avez vous vérifié que le nom (propriété FieldName) de la colonne "nom" est valide et qu'elle est une instance de TStringField ?

[Invité]

merci de votre aide, on se rapproche !

ce qui fonctionne :

uniquement pour les mots commençants par edtRecherche.Text

Code :

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

1
2
3
CDSClient.FilterOptions := [foCaseInsensitive];
CDSClient.Filter        := 'nom = ' + quotedStr(edtRecherche.Text + '*');
CDSClient.Filtered      := True;

ce qui ne fonctionne pas :

uniquement pour les mots finissants par edtRecherche.Text

Code :

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

1
2
3
CDSClient.FilterOptions := [foCaseInsensitive];
CDSClient.Filter        := 'nom = ' + quotedStr('*' + edtRecherche.Text);
CDSClient.Filtered      := True;

uniquement pour les mots contenants et ayant au moins un caractère avant et après

Code :

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

1
2
3
CDSClient.FilterOptions := [foCaseInsensitive];
CDSClient.Filter        := 'nom = ' + quotedStr('*' + edtRecherche.Text + '*');
CDSClient.Filtered      := True;

avez-vous des idées ?

merci
ben

[SergioMaster]

Bonjour,
La meilleure idée serait de passer par une Query (j'ai horreur de filtres)

Sinon que se passe t-il en utilisant le % au lieu de l'* ? et il existe toujours la possibilité d'utiliser l'évènement onFilterRecord

[Invité]

si j'utilise le % au lieu de l'*, cela ne fonctionne pas, aucune ligne n'est sélectionnée.

du coup je fais autrement, j'utilise les params sur les CDS.
j'ai voulu tester les filtres, c'est pas une réussite...