[vtdeleon]

Saludos

Código Delphi [-]
With Query do begin
  Close;
  Sql.Text:=SELECT NOMBRE FROM TABLA WHERE NOMBRE LIKE :buscar';
  Sql.ParamByName('buscar').AsString:=edit1.Text;
  Open;
End;