[ContraVeneno]

o tambien:

Código Delphi [-]
Query1.SQL.Add ('WHERE campo Like '+QuotedStr(Edit1.Text+'%'));