Ver Mensaje Individual
  #1  
Antiguo 29-09-2011
martinlillo martinlillo is offline
Miembro
NULL
 
Registrado: sep 2011
Posts: 32
Reputación: 0
martinlillo Va por buen camino
Contar registros de un dataset

Gente, quiero mostrar en un form la cantidad de registros de un dataset. Puse un IBQuery, seteando el sql en "select count(*) from tabla", y apenas abre el form, en el evento OnShow, le pongo:

Código Delphi [-]
Label3.Caption := ibquery1.Fields[0].asstring;

Hasta ahí todo bien, cuando abre el form, me tira el número correcto. El tema es que tengo un DBGrid, y un campo de edición que uso como filtro. En ese campo, en el evento OnKeyUp, genero un

Código Delphi [-]
 DM.tabla.Close;
 DM.tabla.SelectSQL.Text := 'select * from tabla where campo1 starting'+quotedstr(Edit1.Text);
 DM.tabla.Open;

Esto anda bárbaro, a medida que escribo, la grilla va mostrando los resultados parciales.

El tema es que cuando quiero mostrar la cantidad de resultados actuales en la grilla, haciendo esto

Código Delphi [-]
 ibquery1.close;
 ibquery1.ExecSQL;
 IBQuery1.Open;
 Label3.Caption := ibquery1.Fields[0].asstring;

Me salta el error "Use Open for a select statement"

Alguno tiene idea de qué estoy haciendo mal?? Uso Firebird.

Saludos y gracias!
__________________
Programo por comida!
Responder Con Cita