Consultas Access en Delphi

[Neftali [Germán.Estévez]]

Empezado por Er0s

...pero si no entiendo mal neftali, me estas diciendo que use codigo para acceder a las BD no? como si de un fichero se tratase no?

Intentaré explicarme mejor.

Hay 2 formas de ejecutar una consulta en Access desde un programa Delphi.

OPCION 1: Crear la consulta en Delphi utilizando SQL. Para ello necesitaras un componente TADOQuery; Y como tu consulta tiene una parámetro (valor variable) que comentas que es el DNI, deberás usar algo similar a lo que Caro te ha comentado aquí.

OPCION 2: Si no sabes SQL o quieres usar la consulta que has creado en Access, debes utilizar un componente TADOStoredProc. Como tu consulta tiene un parámetro variable, debes usar para rellenarlo un código similar al que Caro te ha comentado en este otro post.

Si tu consulta no tuviera parámetros podrías utilizar un TADOStoredProc directamente o pegar la SQL en un TADOQuery y ejecutarlo directamente (sin código). Como tu consulta tieve un parámetro variable (DNI) o se lo añades con código al TADOQuery(SQL) o se la pasas al TADOStoredProc. En ambos casos deberás utilizar algo de código.

Un saludo.

[Er0s]

El codigo Funciona

datamodule1.Consulta.Close;
datamodule1.Consulta.Prepared := True;;
datamodule1.Consulta.Parameters[0].Value := Edit1.Text;
datamodule1.Consulta.Open;
datamodule1.Consulta.ExecProc;

Ahora mi pregunta, dado mi ignorancia, es la siguiente como muestro esos datos filtrados por DNI en pantalla ya sea en DBedits o en una DBGrid, es decir como busco en la tabla dichos datos con el parametro obtenido y como los muestro despues en pantalla?

[*Caro*]

Empezado por Er0s

Ahora mi pregunta, dado mi ignorancia, es la siguiente como muestro esos datos filtrados por DNI en pantalla ya sea en DBedits o en una DBGrid, es decir como busco en la tabla dichos datos con el parametro obtenido y como los muestro despues en pantalla?

Hola de nuevo, en el Edit ya le estas pasando un valor a tu consulta, ahora solo debes añadir un DataSource enlazado a tu TAdoStoredProc y tu dbgrid enlazado a tu datasource y veras el resultado.

Saluditos

[Er0s]

Empezado por Caro

hora solo debes añadir un DataSource enlazado a tu TAdoStoredProc y tu dbgrid enlazado a tu datasource y veras el resultado.

Saluditos

Llevaba to la mañana probandolo y no habia manera de mostrar datos...... Toda la mañana metiendo DNI en el Edit y que no salen los datos. Una y mil veces hice lo que acabas de escribir y una y mil veces metia el DNI a ver si encontraba al cliente y nada. hasta que viene la iluminacion y me llega a la mente " Calamar esta consulta necesita un nombre no un DNI" lol.

Todo Ok, ya me muestra datos. Gracias por vuestra rapida ayuda.

Hasta la proxima Duda :P

[Er0s]

Despues de un año trabajando con componentes TAdoStoreProc, Gracias a vuestra ayuda, me encuentro hoy con un problemilla.

Ejemplo:

Tenemos dos explotaciones ganaderas, si escojo una explotación ganadera quiero mostrar un listado de las cabezas de ganado que hay en dicha explotacion y si escojo la otra pues obviamente mostrara las cabezas de ganado que existan.

Con los ejemplos que aprendí gracias a vosotros, funciona pero....

1. selecciono explotacion
2. quiero listado
3. no sale el listado... DBGrid vacia
4. quiero listado
5. Sale el listado siempre que lo solicite de aquí en adelante
6. Si selecciono otra explotacion volvemos al punto 1

Código Delphi [-]
    datamodule1.storeproc.Close;
    datamodule1.storeproc.Parameters[0].Value:=ExploId;
    datamodule1.storeproc.Prepared:=true;
    datamodule1.storeproc.open;
    datamodule1.storeproc.exeproc;

Este es el código que utilizo

Alguna idea de porque no me da la información la primera vez que lo solicito?

[[Caral]]

Hola
Bueno, nunca he usado un TAdoStoreProc, de hecho nunca lo habia visto (que despistado).
Lo cierto es que si hay una consulta en access y la quiero usar en mi programa en delphi, tal cual, simplemente la llamo desde un simple ADOTable, como si fuera una tabla mas.
Si se necesita filtrarla, pues se hace un filtro.
Creo que se le llama una vista, en firebird se usan igualmente.
Saludos

[Er0s]

Hola Caral!!

Siguiendo tus pasos he creado una AdoTable y se la asigno al datasouce y este a la dbgrid hasta ahí todo correcto.


Siguiendo el ejemplo anterior, el codigo de explotación es un numero que tengo almacenado en una variable global llamada ExploId. Como filtro la tabla con la variable global? Se puede filtrar dicha tabla mirando en un solo campo de ella o revisa toda la tabla?

datamodule1.adotable.filter........

Gracias