Hola que tal José!
El 12 de Julio me respondiste el Mensaje de Como Agrupar Columnas en un
TBrowse.
Gracias...
Estuve intentando hacer algo , pero me ha salido a medias, no se me puedas
dar la mano ó si tengo que recurrir al los servicios de XCS.
CLASS TmovsTemp FROM TForm
DATA lAgrupa INIT .T. <=======
DATA ValorGrupo <=========
COMPONENT oADO
COMPONENT oAdoDataSource1
COMPONENT oSQLQuery1
COMPONENT oBrow
COMPONENT oDBBrowse1Column1
COMPONENT oDBBrowse1Column3
COMPONENT oBrowColumn4
COMPONENT oBrowColumn7
COMPONENT oBrowColumn8
COMPONENT oBevel1
COMPONENT oBtnAgregar
COMPONENT oBtnCancelar
COMPONENT oDBNavega
METHOD CreateForm()
METHOD FormInitialize( oSender )
METHOD BrowFecha_Oper( oSender, Value, nImage )
METHOD BrowFecha_Cheque( oSender, Value, nImage )
METHOD BrowDrawRow( oSender, nRowPos )
METHOD BtnCancelarClick( oSender )
METHOD BtnAgregarClick( oSender )
METHOD BrowColumn1GetData( oSender, Value, nImage ) <====
ENDCLASS
METHOD BrowColumn1GetData( oSender, Value, nImage ) CLASS TmovsTemp
LOCAL RETVAL:=""
IF ::lAgrupa
::ValorGrupo:=Value
::lAgrupa:=.f.
RETVAL:=::ValorGrupo
ELSE
IF Value<>::ValorGrupo
::lAgrupa:=.t.
ELSE
RETVAL:=SPACE(13)
ENDIF
ENDIF
RETURN RETVAL
Agregue dos DATAS lAgrupa y ValorGrupo y en el Metodo GetData puse esto
y si se agrupan las columnas mas o menos como quiero pero solo cuando el
Browse se despliega por primera vez, despues si navego hacia o hacia abajo
ya no se muestra como debe ser.
Para mi es muy necesario hacer esto ya que el Programa hecho en Visual
Basic que estoy convirtiendo a Xailer usa el Componente TrueDbGrid que por
cierto es muy bueno.
No puedo decirle al cliente , que no puedo agrupar las columnas con el
Browse de Xailer.
Como una sugerencia:
* Agregar una Propiedad al Browse para que agrupe columnas como lo hace el
TrueDbGrid (con esta a todos les gustaria mas el Browse de Xailer)
* Agregar una Propiedad al Browse que diga cuantas lineas queremos para los
encabezados
Si lo de agrupar columnas con un poco de ayuda saldría ó si lo debo de
canalizar con XCS
Saludos....
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para Jos
-
Martin del Angel[1]
- Mensajes: 114
- Registrado: Dom Dic 18, 2005 7:50 pm
Para Jos
Martín,
envíame un ZIP con un ejemplo y una DBF con unos pocos datos para probar y
en cuanto tenga un hueco le echo un vistazo.
Saludos,
José Lalín
envíame un ZIP con un ejemplo y una DBF con unos pocos datos para probar y
en cuanto tenga un hueco le echo un vistazo.
Saludos,
José Lalín
-
Martin del Angel[1]
- Mensajes: 114
- Registrado: Dom Dic 18, 2005 7:50 pm
Para Jos
Lo voy a preparar y te le envio
Gracias de antemano....
"José Lalín" <dezac@corevia.com> wrote in message
news:46a61420$[email=2@ozsrv2.ozlan.local...]2@ozsrv2.ozlan.local...[/email]
>
> Martín,
>
> envíame un ZIP con un ejemplo y una DBF con unos pocos datos para probar y
> en cuanto tenga un hueco le echo un vistazo.
>
> Saludos,
> José Lalín
Gracias de antemano....
"José Lalín" <dezac@corevia.com> wrote in message
news:46a61420$[email=2@ozsrv2.ozlan.local...]2@ozsrv2.ozlan.local...[/email]
>
> Martín,
>
> envíame un ZIP con un ejemplo y una DBF con unos pocos datos para probar y
> en cuanto tenga un hueco le echo un vistazo.
>
> Saludos,
> José Lalín