Filtrer une table avec LIKE sans le SQL

Bonjour,
j'ai une table travailleurs (dans DBGrid), et un edit1.
je veux utiliser la fonction LIKE pour faire un filtre selon les lettres qui je lés tapes dans le edit, mais je ne sais pas comment le faire?
Sachant que je veux pas utiliser une raquette SQL.

Normalement ça devrait être quelque chose comme ça, je suis pas sur:

Code:

---

1 2 3 4

procedure TForm1.Edit1Change(Sender: TObject); begin TTravailleur.Filter:=('NomTRV').AsString LIKE ''%' + Edit1.Text + '%'''; end;

---

Merci d'avance...

Citation:

---

Envoyé par samidz2014

Normalement ça devrait être quelque chose comme ça, je suis pas sur:

---

la touche F1 est généralement là pour ça

Citation:

---

Envoyé par aide

Vous pouvez utiliser l'opérateur LIKE dans la condition, avec des caractères génériques SQL standard tels que pour cent (%) et souligné (_). La condition de filtrage suivante récupère tous les enregistrements dont le champ Country commence par "F" : Country LIKE 'F%'

---

bien sûr cela dépend des composants d'accès utilisés (et donc en gros de la version de Delphi)

de mémoire, avec des composants BDE cela donnerait quelque chose comme ça

Code:

---

1 2 3 4 5 6 7 8

procedure TForm1.Edit1Change(Sender: TObject); begin TTravailleur.DisableControls; TTravailleur.Filtered:=False; TTravailleur.Filter:=format('NomTRV LIKE %%%s%%',[Edit1.Text]); // à vérifier, la chaine de formatage à propos des doubles % TTravailleur.Filtered:=True; TTravailleur.EnableControls; end;

---

Si les %% sont utiles pour mettre juste un % ça je confirme
Il manque les '' .

Code:

---

TTravailleur.Filter:=format('NomTRV LIKE ''%%%s%%''',[Edit1.Text]); // à vérifier, la chaine de formatage à propos des doubles %

---

J'utilise généralement cette notation :

Code:

---

1 2	Filter := Format('UPPER(%s) LIKE UPPER(%s)', [AFieldName, QuotedStr('%' + AValue + '%')]);

---

Le double UPPER est là car le LIKE sur DBISAM est sensible à la casse, donc en fonction SGBD, ils ne sont pas forcément nécessaires.