Xailer & OZ Software

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....

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

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