PDA

Ver la Versión Completa : Ayuda en la creación grupos sin dataset


droide01
03-01-2007, 22:00:58
Hola a todos
Estoy intentando crear lista por grupos con el QuickReport sin usar DataClient. Para ello estoy utilizando el evento OnNeedData que se encarga de leer la lista de datos que le mando. Aquí teneis un ejemplo:
//---------------------------------------------------------------------------
void __fastcall TForm2::qrNeedData(TObject *Sender, bool &MoreData)
{
TNodoUsuario* Nodo;
Nodo = (TNodoUsuario*)lista->getCurrent();
if (Nodo == NULL) {
MoreData = false;
return;
}
qrCabecero->Caption = Nodo->asCabecero;
qrNombre->Caption = Nodo->asNombre;
qrIdentificacion->Caption = Nodo->asIdentificacion;
lista->setNext();
MoreData = true;
}

Los datos a mostrar tienen la siguiente estructura:
AnsiString asUsuario[10][3] = {{"Primero","Alfonso", "10101010L"},
{"Primero","Andrea", "12121212T"},
{"Primero","Maria", "14141414F"},
{"Segundo","Cristina", "15151515D"},
{"Segundo","Lorenzo", "16161616S"},
{"Segundo","Javier", "17171717G"},
{"Segundo","Montse", "18181818V"},
{"Tercero","Iván", "19191919A"},
{"Tercero","Mónica", "21212121A"},
{"Tercero","Francisco", "22222222R"}};

He conseguido que me salga de la siguiente forma::)

Primero
Alfonso 10101010L
Primero
Andrea 12121212T
...
Para ello estoy ulizando un GroupHeader y un SubDetail.
Pero no consigo establecer un criterio que me permita agrupar por el campo Cabecero, en este caso 'Primero'|'Segundo','Tercero':(

He estado mirando la ayuda y he visto que existe la propiedad Expresion que permite especificar este criterio, pero sólo para DataClient.

¿Sabe alguien cómo puedo establecer el criterio de agrupamiento sin usar DataClient?:confused: :confused: :confused: :confused: :confused:

Un saludo

Droide01