FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour xbrowser no muestra el scroll
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
xbrowser no muestra el scroll
Posted: Wed Dec 13, 2023 08:56 AM
Hola.
Uso un Listbox desde los recursos. ya he seteado el scrool y en el codigo tengo esto:
Code (fw): Select all Collapse
   WITH OBJECT ::oBrw
      :nMarqueeStyle       := 5
      :bClrStd             := { || IF( ::oBrw:KeyNo() % 2 == 0, ;
                                       { CLR_BLACK, RGB( 255, 255, 255 ) }, ;
                                       { CLR_BLACK, RGB( 214, 255, 245 ) } ) }

      :bClrSel             := { || { CLR_BLACK,  RGB( 160, 240, 240 ) } }

      :lKinetic            := .F.
      :ltransparent        := .F.
      :lHScroll := .t.
      :lRecordSelector     := .F.
      :lAllowColSwapping   := .F.
      :lColDividerComplete := .F.
      :nRowDividerStyle    := 4
      :nStretchCol         := STRETCHCOL_LAST
      :nColDividerStyle    := 4

      :nHeaderHeight       := 25
      :nRowHeight          := 23
      :lFlatStyle          := .T.
pero no me muestra el scroll vertical, en que le estoy errando?
gracias
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: xbrowser no muestra el scroll
Posted: Wed Dec 13, 2023 08:59 AM

Estimado Gustavo,

Has especificado WS_VSCROLL como estilo en el recurso ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: xbrowser no muestra el scroll
Posted: Wed Dec 13, 2023 09:22 AM
Antonio Linares wrote:Estimado Gustavo,

Has especificado WS_VSCROLL como estilo en el recurso ?
no se donde hay qe ponerlo, uso pelesC
agrego una imagen

https://photos.app.goo.gl/ca3rTjAHJzk7Kkn19
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: xbrowser no muestra el scroll
Posted: Wed Dec 13, 2023 09:41 AM

Parece que ya lo tienes activado

Puedes copiar aqui el fichero rc ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: xbrowser no muestra el scroll
Posted: Wed Dec 13, 2023 10:06 AM
Antonio Linares wrote:Parece que ya lo tienes activado

Puedes copiar aqui el fichero rc ?
Code (fw): Select all Collapse
DLGCLIENTE DIALOGEX DISCARDABLE 6, 18, 448, 337
STYLE DS_SHELLFONT|WS_POPUP|DS_MODALFRAME|DS_CONTEXTHELP|DS_3DLOOK|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
CAPTION ".: Cliente :."
FONT 8, "Tahoma", 0, 0, 1
{
  CONTROL " Datos del CONTACTO directo ", 4001, "Button", BS_GROUPBOX, 15, 13, 416, 87
  CONTROL "Nombres:", 4003, "Static", WS_GROUP, 33, 31, 97, 8
  CONTROL "Edit", 100, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 33, 41, 101, 12
  CONTROL "Apellidos:", 4004, "Static", WS_GROUP, 154, 31, 97, 8
  CONTROL "Edit", 102, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 154, 41, 118, 12
  CONTROL "Email:", 4002, "Static", WS_GROUP, 284, 31, 99, 8
  CONTROL "Edit", 104, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 284, 41, 125, 12
  CONTROL "Whatsapp:", 4010, "Static", WS_GROUP, 33, 61, 99, 8
  CONTROL "Edit", 106, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 33, 71, 101, 12
  CONTROL "País:", 4006, "Static", WS_GROUP, 154, 61, 99, 8
  CONTROL "", 108, "ComboBox", WS_BORDER|CBS_DROPDOWNLIST|CBS_SORT|WS_VSCROLL|WS_TABSTOP, 154, 71, 133, 65
  CONTROL "Ciudad:", 4008, "Static", WS_GROUP, 304, 61, 85, 8
  CONTROL "Edit", 110, "Edit", ES_AUTOHSCROLL|WS_BORDER|WS_TABSTOP, 304, 71, 105, 12
  CONTROL " Solicitantes ", 4005, "Button", BS_GROUPBOX, 15, 111, 416, 187
  CONTROL "", 112, "ListBox", LBS_SORT|LBS_NOTIFY|WS_VSCROLL|WS_TABSTOP, 28, 131, 323, 159
  CONTROL "&Agregar Solicitante", 200, "Button", BS_MULTILINE|WS_TABSTOP, 366, 133, 50, 36
  CONTROL "&Ver Carpeta", 202, "Button", WS_TABSTOP, 15, 308, 69, 17
  CONTROL "&Guardar carpeta", 204, "Button", WS_TABSTOP, 362, 311, 69, 17
}
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: xbrowser no muestra el scroll
Posted: Wed Dec 13, 2023 10:10 AM

Modifica esta línea:

CONTROL "", 112, "ListBox", LBS_SORT|LBS_NOTIFY|WS_VSCROLL|WS_TABSTOP, 28, 131, 323, 159

asi:

CONTROL "", 112, "TXBrowse", WS_VSCROLL|WS_TABSTOP, 28, 131, 323, 159

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1816
Joined: Wed Oct 26, 2005 02:49 PM
Re: xbrowser no muestra el scroll
Posted: Wed Dec 13, 2023 12:02 PM
Hola buenos días, en algún momento nos sucedió algo similar, si no estoy mal creo que hay que definir un control personalizado para que funcione, con las propiedades, que se ven en la imagen.
Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
Posts: 729
Joined: Tue Oct 18, 2005 06:49 PM
Re: xbrowser no muestra el scroll
Posted: Sat Dec 30, 2023 03:49 PM

Si utilizas RESOURCES en style debe colocar, para que aparezca el scroll en xBrowser, lo siguiente:

0x50D00000 ---> Barra Horizontal

0x50A00000 ---> Barra Vertical

Continue the discussion