FiveTech Software tech support forums

Posted: **Thu Aug 14, 2014 10:09 pm**

Necesitamos que la barra de scroll derecha funcione correctamente.

Venga, vamos a intentar solucionar esto ahora

Gracias!

Posted: **Fri Aug 15, 2014 8:51 am**

Quita la claúsula HSCROLL en la creación de la ventana
Ahora falta ajustar el salto ya que baja la posicion de los items.

https://navarro_cristobal@bitbucket.org ... ort_n1.git

Posted: **Fri Aug 15, 2014 9:55 am**

Cristobal,

Muchisimas gracias

Posted: **Fri Aug 15, 2014 5:17 pm**

Antonio, creo que la function SetScrollBar debería quedar de momento asi

Code: Select all

FUNCTION SetScrollBar()

   LOCAL oVScroll
   LOCAL nPageZugabe := 392

   if !empty( oMainWnd:oWndClient:oVScroll )
   oMainWnd:oWndClient:oVScroll:SetRange( 0, 100 )
   //oMainWnd:oWndClient:oVScroll:SetRange( 0, nTotalHeight )

   oMainWnd:oWndClient:oVScroll:bGoUp     = {|| ScrollVertical( .T. ) }
   oMainWnd:oWndClient:oVScroll:bGoDown   = {|| ScrollVertical( , .T. ) }
   oMainWnd:oWndClient:oVScroll:bPageUp   = {|| ScrollVertical( ,, .T. ) }
   oMainWnd:oWndClient:oVScroll:bPageDown = {|| ScrollVertical( ,,, .T. ) }
   oMainWnd:oWndClient:oVScroll:bPos      = {| nWert | ScrollVertical( ,,,, .T., nWert ) }
   oMainWnd:oWndClient:oVScroll:nPgStep   = nPageZugabe   //392

   oMainWnd:oWndClient:oVScroll:SetPos(0)
   endif

   if !empty( oMainWnd:oWndClient:oHScroll )
   oMainWnd:oWndClient:oHScroll:SetRange( 0, 100 )
   //oMainWnd:oWndClient:oHScroll:SetRange( 0, nTotalWidth )

   oMainWnd:oWndClient:oHScroll:bGoUp     = {|| ScrollHorizont( .T. ) }
   oMainWnd:oWndClient:oHScroll:bGoDown   = {|| ScrollHorizont( , .T. ) }
   oMainWnd:oWndClient:oHScroll:bPageUp   = {|| ScrollHorizont( ,, .T. ) }
   oMainWnd:oWndClient:oHScroll:bPageDown = {|| ScrollHorizont( ,,, .T. ) }
   oMainWnd:oWndClient:oHScroll:bPos      = {| nWert | ScrollHorizont( ,,,, .T., nWert ) }
   oMainWnd:oWndClient:oHScroll:nPgStep   = 602

   oMainWnd:oWndClient:oHScroll:SetPos(0)
   endif
RETURN (.T.)

FiveTech Software tech support forums

Siguiente objetivo: Por que la barra de scroll no funciona ?

Siguiente objetivo: Por que la barra de scroll no funciona ?

Re: Siguiente objetivo: Por que la barra de scroll no funciona ?

Re: Siguiente objetivo: Por que la barra de scroll no funciona ?

Re: Siguiente objetivo: Por que la barra de scroll no funciona ?