Modifier la requête de base de données à l'exécution

Question

J'essaie de filtrer un TDBGrid via un TEdit, en gérant l'événement TEditonChange. J'ai TIBQuery à la liste tous les enregistrements de la grille:

SELECT id,obra,cliente,fecha,nro_estudio,sondeo FROM proyecto; 

Lorsque l'utilisateur insère des caractères dans le TEdit, la grille doit être actualisé par le champ Cliente.

Mon code essaie de le faire, mais lorsqu'il exécute le gestionnaire, la requête renvoie un jeu de résultats vide. J'utilise Firebird 2.5 et IB Components.

pertinentes du Code:

query := Self.qryTodos; 
query.Close(); 
query.SQL.Clear(); 
query.SQL.Add('SELECT id,obra,cliente,fecha,nro_estudio,sondeo FROM proyecto WHERE cliente LIKE :Cliente'); 
query.ParamByName('Cliente').AsString := QuotedStr('%'+Self.busqueda.Text+'%'); 
query.Open(); 
DMConnect.Transaction.Commit(); 

Answer 1

Vous n'avez pas besoin QuotedStr lorsque vous fournir des paramètres de chaîne. En l'utilisant, vous le faites ne plus correspondre (par exemple "String" devient '' '% String%' '')

Answer 2

Si vous êtes autour de votre terme de recherche en% j'utiliserais la contenant la clause, donc vous pouvez écrire votre requête comme:

query := Self.qryTodos; 
query.Close(); 
query.SQL.Clear(); 
query.SQL.Add('SELECT id,obra,cliente,fecha,nro_estudio,sondeo FROM proyecto WHERE cliente CONTAINING :Cliente'); 
query.ParamByName('Cliente').AsString := Self.busqueda.Text; 
query.Open(); 

et de supprimer l'instruction Commit comme indiqué @LightBulb. Cela fonctionnera si vous souhaitez inclure le% dans votre terme de recherche pour une raison quelconque.