Problema con DBGrid y BDE

[[Delphius]]

Hola jairoath,
Bienvenido a Cludelphi. Como recien ingresas te informo sobre la guia de estilo, te pediría que dediques unos minutos para leerla.

Con respecto a tu pregunta: ¿Deseas construir una consulta en tiempo de ejecución? O sólo quieres que en tiempo de ejecución se suministre el valor?

De cualquier manera lo que se hace es usar parámetros:

Código SQL [-]
select *
from tu_tabla
where campo = :parametro

Los dos puntos indican que lo que sigue es un parámetro.

Y luego en Delphi bastará con hacer:

Código Delphi [-]
TuQuery.Parameters.ParamByName(parametro).Value := Edit1.text;
TuQuery.Parameters.ParamByName(parametro).DataType := ftString;
TuQuery.Open;

En el ejemplo asumí que se espera un string (desde un Edit), y se usa ADO. Sugiero que busques en los foros bajo la palabra clave Parametros y/o ParamByName.

Tu consulta se puede hacer en tiempo de ejecución:

Código Delphi [-]
TuQuery.Sql.Clear;
TuQuery.Sql.Add('select .... ');
TuQuery.Open;

El código lo escribí a mano... no tengo Delphi en estos momentos abierto... pero creo que va a andar sin problemas.

Saludos,

[[Caral]]

Hola
Solo un pequeño cambio.

Código Delphi [-]
TuQuery.Parameters.ParamByName('parametro').Value := Edit1.text;
TuQuery.Parameters.ParamByName('parametro').DataType := ftString;
TuQuery.Open;

No estoy muy seguro si bde acepta ese concepto, de no ser asi, se puede hacer asi:

Código Delphi [-]
TuQuery.Parameters[0].Value := Edit1.text;
TuQuery.Parameters[0].DataType := ftString;
TuQuery.Open;

Saludos

[[Delphius]]

¡Ups! No me di cuenta de que especificó que era DBE!

Lo tuyo funciona bien. Y si no me falla la memoria, bastaría con un AsString y el DataType está demás.

Saludos,

[[Caral]]

Hola
En realidad funciona con solo el value sin necesidad del datatype, pero asi tambien funciona.
Me parece que es mejor usar, ya lo dije antes, ado en vez de bde, para access se estable una conexión directa.
Pero que te voy a explicar a ti, hombre si tu eres el que sabe de esto, lo que pasa es que no tienes delphi a mano.
Saludos

[[eduarcol]]

resumiendo lo qe dice Delphius:

en el query escribe esto:

Código SQL [-]
select * from usuario where codigo=:cod

luego cuando lo vayas a ejecutar, escribes asi

Código Delphi [-]
miQuery.Active := False;
miQuery.ParambyName('cod').AsInteger := nValor;
miQuery.Active := True;

[jairoath]

wow muchas gracias a los tres por haberse tomado el tiempo de responderme tan rapido, efectivamente pude solucionar mi problema, lo que decian lo probe y de una funciono, monte un grid e hice la consulta y luego al ejecutar el proceso pude mandar el numero por referencia y el grid solo mostro los datos que necesitaba asi:

query: select * from clientes where cliente=:cod
luego dentro de un botonclick ejecute la consulta asi:

ADOQuery1.Active := False;
ADOQuery1.Parameters.ParamByName('cod').Value:= 12;
ADOQuery1.Active := True;

gracias por su ayuda, saludos desde pereira y los voy a molestar mucho mas jejejeje