eso.
gracias.
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour en TWbrowse se puede ocultar una columna?
Si se puede ocultar, hay que darle ancho 0
saludos
Pedro Gonzalez
pymsoft wrote:Si se puede ocultar, hay que darle ancho 0
saludos
SI pero al darle ancho 0 se puede luego cambiar el tamaño, lo que quiero es que esa columna "visualmente" no exista. que no se pueda cambiar el tamaño ni su lugar.
gracias.
Acabo de hacer la prueba con twbrowse, dandole ancho 0, y no se puede modificar el ancho (al menos con el mouse) y tampoco mover o cambiar de lugar.
Saludos
Pedro Gonzalez
Alguna vez hice esto para ocultar columnas a conveniencia:
// Para ocultar columnas durante la ejecución
METHOD SetSizes( aHeader, aSizes ) CLASS TWBrowse // AAL
::aHeaders := If( aHeader != nil, aHeader, {} )
::aColSizes := If( aSizes != nil, aSizes , {} )
::aTmpColSizes := AClone( ::aColSizes )
::GetColSizes()
RETURN nilAlfredo Arteaga wrote:Alguna vez hice esto para ocultar columnas a conveniencia:
// Para ocultar columnas durante la ejecución METHOD SetSizes( aHeader, aSizes ) CLASS TWBrowse // AAL ::aHeaders := If( aHeader != nil, aHeader, {} ) ::aColSizes := If( aSizes != nil, aSizes , {} ) ::aTmpColSizes := AClone( ::aColSizes ) ::GetColSizes() RETURN nil
Hola, pero como decia mas arriba, si hago eso de poner en 0 el "sieze" de una de las columnas con el mouse se puede cambiar el tamaño igual y agrandar el tamaño...
para mi estaria faltando esto:
1) poner en 0 el size de una columna (esto hoy por hoy con la de Hernan se peude hacer)
2) bloquear la posibilidad de cambiar el tamaño para la columna del punto (1)... (esto estaría faltando)
Este codigo que pongo a mi me habilita igual el cambio del tamaño de la columna que en size tenga 0.
WITH OBJECT ::oTw
:aActions := Array(3)
:aHeaders := ::aNombreColumnas
:aColSizes := ::aTamanioColumnasGracias.
Cierto. Parece que hay que agregar algo más.
He realizado varios cambios a la clase de Hernan, por lo que es posible que no te funcione tal como la tengo pero si te interesa puedo enviartela para que la tomes de referencia.
// lColVisible:= .t.
// ::nColAct++
While .t. .AND. ::nColAct<Len(aSizes) // AAL ocultar
::nColAct++
lColVisible:= !( aSizes[::nColAct] == 0 )
IF lColVisible
exit
ENDIF
EndDoHe realizado varios cambios a la clase de Hernan, por lo que es posible que no te funcione tal como la tengo pero si te interesa puedo enviartela para que la tomes de referencia.
"Alfredo Arteaga"]Cierto. Parece que hay que agregar algo más.
Si por favor enviamela asi la veo. gracias.