Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Parametros (https://www.clubdelphi.com/foros/showthread.php?t=46680)

mauqu 06-08-2007 18:07:43

Parametros
 
Gracias por la ayuda en mi anterior consulta, ahora me surgió algo nuevo :S.

tengo un adoquery que tiene una consulta con parametros.

Código SQL [-]
 
SELECT
  T0.CLAVE AS CLAVE,
  T0.TIPOPORDUCTO AS TIPO,
  T0.NOMBREPRODUCTO AS NOMBRE
FROM
  PRODUCTO T0
WHERE
  T0.TIPOPRODUCTO = prTipo

lo que quiero hacer es que en un dbgrid me muestre el resultado de este query, para esto el dbgrid apunta a un datasource que a su vez apunta a un clientdataset, este a un datasetprovider y finalmente el datasetprovider mira a un adoquery que tiene la consulta de arriba. :S.

el el formshow tengo lo sieguiente.

Código Delphi [-]
procedure TfrmMain.FormShow(Sender: TObject);
begin
  adoquery.Parameters.ParamByName('prTipo').Value:=2;
  datasource.open;
end;

pero me trae el dbgrid sin datos, que estoy haciendo mal???
uso el clientdataset por que quiero que me guarde los datos en memoria y me libere la conexión del adoquery.

saludos

mauqu 06-08-2007 18:11:40

Código SQL [-]
SELECT
T0.CLAVE AS CLAVE,
T0.TIPOPORDUCTO AS TIPO,
T0.NOMBREPRODUCTO AS NOMBRE
FROM
PRODUCTO T0
WHERE
T0.TIPOPRODUCTO =  : prTipo

olvide ponerle los dos puntos antes del nombre del parametro, lo corrijo para que que se entienda que eso esta bien definido

eduarcol 06-08-2007 18:25:01

la consulta esta bien solo debes cambiar esto

Código Delphi [-]
procedure TfrmMain.FormShow(Sender: TObject);
begin
  adoquery.Active := False;
  adoquery.Parameters.ParamByName('prTipo').Value:=2;
  adoquery.Active := True;
end;


La franja horaria es GMT +2. Ahora son las 10:53:33.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi