Busqueda por varios campos

[RoyTan]

Saludos foreros.

Sé que este tema se ha comentado varias veces pero lo siento no me entero.

Necesito buscar un numero de teléfono en varios campos y no hay forma, lo he intentado de varias formas, solo me sale buscar en un campo no en todos.

Buscar en un campo lo hago así, y funciona.

Código Delphi [-]
ModuloDatos.IBQAgenda.Active   := False;
   ModuloDatos.IBQAgenda.Sql.Text := 'Select * from AGENDA where Telefono1 Like ' + QuotedStr('%' + EditTelefono.Text + '%');
   ModuloDatos.IBQAgenda.Active   := True;

Y en varios lo hago así, y no funciona.

Código Delphi [-]
ModuloDatos.IBQAgenda.Active   := False;
   ModuloDatos.IBQAgenda.Sql.Text := 'Select * from AGENDA where Telefono1 or Telefono2 or Telefono3 or Telefono4 Like ' + QuotedStr('%' + EditTelefono.Text + '%');
   ModuloDatos.IBQAgenda.Active   := True;

Bueno espero haber explicado bien el problema, pero hace mucho que no programo, las cosas se olvidan y mas a mí.

Gracias.

[TOPX]

Saludos.

Con algo así...

Código Delphi [-]
'SELECT * FROM AGENDA WHERE Telefono1 LIKE ' + QuotedStr('%' + EditTelefono.Text + '%') + 
' OR Telefono2 LIKE ' + QuotedStr('%' + EditTelefono.Text + '%') + 
' OR Telefono3 LIKE ' + QuotedStr('%' + EditTelefono.Text + '%') + 
' OR Telefono4 LIKE ' + QuotedStr('%' + EditTelefono.Text + '%')

-

[RoyTan]

Gracias TopX.

Funciona a la perfección.

Un saludo y muchas gracias.