驴Como puedo suprimir la barra de desplazamiento horizontal en un wBrowse, desde c贸digo?. Lo he intentado con oBrw:oHScroll:SetRange(0,0), pero no me funciona. Me dice "CLASS "NIL" has no exported method SetRange".
Desde recurso, no tengo problemas, pero si desde c贸digo.
驴Alguna ayudita?
solo heredando o modificando la clase para cambiar nStyle
Gracias Quique
Manuel Valdenebro wrote:驴Como puedo suprimir la barra de desplazamiento horizontal en un wBrowse, desde c贸digo?. Lo he intentado con oBrw:SetRange(0,0), pero no me funciona.
nStyle := nOr( WS_CHILD, WS_VSCROLL, WS_BORDER, WS_VISIBLE, WS_TABSTOP)
// en dialogo
oLbx:nStyle := nStyle
// en window
#define GWL_STYLE -16
SetWindowLong( oLbx:hWnd, GWL_STYLE, nStyle )// TWBrowse():lVScroll:= .F. //Suprime la barra vertical
TWBrowse():lHScroll:= .F. //Suprime la barra horizontal
@ 29,130 LISTBOX oLbx ;....
...mmercado wrote:Espero te funcione, un abrazo.Manuel Mercado
csincuir wrote:TWBrowse():= .F. //Suprime la barra horizontal
@ 29,130 LISTBOX oLbx ;....
...
Manuel Valdenebro wrote:csincuir wrote:TWBrowse():= .F. //Suprime la barra horizontal
@ 29,130 LISTBOX oLbx ;....
...
Carlos,
Esta soluci贸n que apriori parece mas sencilla, no me ha funcionado.
Compila bien, pero al ejecutar, la ventana no reconoce la clase y da error.
Antonio, tienes toda la razon, se me olvido mencionarle a Manuel que es para la TWBrowse de Hernan.
Saludos.
Carlos