Foros Club Delphi - Al estilo de filtros?

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - Al estilo de filtros? (https://www.clubdelphi.com/foros/showthread.php?t=7942)

Al estilo de filtros?

Hola amigos,

tengo el siguiente problema a ver si pueden ayudarme:

tengo un base de datos en paradox de esta forma:

bdsolicitantes:
campos:
cedula // numerico e clave primaria.
solicitante // string almacena nombres y apellidos.
representantes // igual al anterior.

Cree un dlgBusqueda para localizar registros. Uso un RadioGroup para 3 opciones: buscar por Solicitante, cedula o representantes.

Ok, en el caso de buscar por cedula, no hay problema, es un campo unico y uso el metodo Locate.

Pero en los caso siguientes tengo la traba: Encuantro la primera ocurrencia, pero al hacer: Tabla.next, salta a otro registro que no se corresponde con los criterios que use en locate.

Quise usar filter. y me volvi un 8, porque segun la ayuda, tengo que capturar un evento e indicarle las carecteristicas del filtro, pero es solo para 1 caso (solicitantes) entonces no se como cambiar en runtime para indicar que es ahora por representantes. Lo que quiero podia hacerse con un query, pero entonces tengo 2 problemas:
La idea es que al consultar la Bd. la informacion que esta no pueda ser modificada, solo localizada, complemantada, incluso marcar y guardar campos Booleanos que estan en false, para eso segun tengo entendido un query debe ser actualizable (no estoy seguro de que me convenga).

Creo que me estoy enrredando y esto va muy largo,

El caso es que cuando busco un soliciante llamado por ejem. Pedro, quiero poder despalzarme solo por los registros que tengan un Pedro en el campo solicitante, luego editar el registro que busco solo añadiendo informacion (ya lo logre poniendo Enabled := False, los campos con datos al cargarlos el el Form), y guardar solo los cambios. Eso es todo lo que estoy buscando.

Si pueden entenderme, gracias por la ayuda, .... :confused:

hay mil formas de hacerlo. El query no es descabellado, pues podes generar la clausula where en tiempo de ejecución, incluso para mezclar varios criterios de busqueda, digamos los de nombre Pedro cuyo representante contenga Juan... :eek:

Para que un query sea actualizable, basicamente debe extraer sus datos de una sola tabla (o de una vista que a su vez cumpla con este mismo criterio), no usar funciones agregadas (sin group by) y no tener campos calculados. En delphi simplemente pones RequestLive a True.

También podes aplicar un flitro local, aunque con muchos registros será ineficiente. Si usas BDE el filtro igual podes construirlo y ponerlo en la propiedad Filter del TBDEDataSet en cuestión, y poner filtered a true. También podes usar el evento OnFilterRecord (lo hará mas lento todavia, pero podes tener filtros mas complejos) y podes discriminar según el criterio elegido por el usuario haciendo algo como:

Código:

begin

  if rgCriterio.ItemIndex = idxPorNombre Then

    Accept := Pos(NombreABuscar, Nombre) > 0

  else if rgCriterio.ItemIndex = idxPorApellido Then

    Accept := Pos(ApellidoABuscar, Apellido) > 0

  else 

    CualquierOtroCriterio;

end;

Por último, podes valerte de la propiedad ReadOnly de los campos del dataset para conseguir que unos sean actualizables y los otros no.

Hasta luego.

;)

Una vez mas gracias Juan, voy a hacer la prueba. Estoy un poco dividido entre este programa y el otro de las imagenes en el que por cierto he recibido tus sugerencias. Veras, creo que debes haber pasado por esto cuando iniciastes, estar confundido entre tasntos conceptos, metodos similares, controles y barreras (para mi en este punto ni tengo idea de como se imprime).
De todos modos, gracias,

todo es un proceso.... no creas que yo naci caminando :)