Club Builder

[Fer]

Hola a todos/as!!!

Voy a soltar un tostón, pero la pregunta es muy muy tonta. Ahí va:

Estoy haciendo un programilla con una base de datos Paradox. Hago una consulta con un Query y lo muestro con un Table. Hasta ahí todo bien. Lo que pasa es que quiero mostrar algun mensaje que ponga algo así como "registro x de n", siendo "x" el registro actual y "n" el nº total de registros en la consulta. Este último si lo se calcular mediante "Query1->RecordCount", pero el primero no puedo, ya que "Query->RecNo" me da la posicion del registro respecto a toda la base de datos, no respecto a la consulta.

Espero haberme explicado con claridad. Agradecería cualquier comentario y/o ayuda que me pudierais prestar. Muuuuuchas gracias.

Bye!!

[KAYETANO]

Hola

No se exactamente como lo habras hecho, pero asin es como se hace "RecordCount" devuleve el total re "RecNo" devuelve la pasicion seleccionada.

Lo que tienes que hacer es un Query con un TQuery y no con un TTable (seguramente habras usado un TTable con un filtro ¿verdad?)

Un Query funciona casi igual que una tabla, CASI. Una vez que lo tengas creado en el evento "AfterScroll" pones :

MiLabel->Caption = MiQuery->RecNo + " de " + MiQuery->RecordCount;

o algo asin. Siendo MiLabel un TLabel puesto en un form.

Espero que te sirva.

Salu2
KAYETANO

[Daniel]

Espero que sea esto lo que buscas
Saludos desde Chihuahua, México.

// Suponiendo que ya tienes el resultado de
// tu busqueda con Query1 entonces:

char Str[50];
Variant Dato;
int i;

// (Query1->RecordCount) corresponde al
//total de registros de tu busqueda
for ( i = 0; i <Query1->RecordCount; i++)
{
//Dato Correspondería al valor de cada uno
//de tus registros para el CAMPO1
Dato = Query1->FieldValues["CAMPO1"] ;

// Después almacena en una variable de
//caracteres la información requerida para
//posteriormente presentarla en un cuadro de
//diálogo

sprintf(Str,"Registro No: %d\nTotal de Registos: %d\nValor del registro: %d",(i+1),Query1->RecordCount,Dato);

Application->MessageBox(Str,"Dialogo",MB_ICONQUESTION);

}